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1.0 INTRODUCTION 

THE M8053 AND M8064 ARfc SINGLE -LINE SYNCHRONOUS. MICRO 
PROCESSOR BASED COMMUNICATIONS INTERFACES WHICH CAN SUPPORT 
BOTH CHARACTER-ORIENTED ( DOCMP , BSC, ETC.) ANO BIT-ORIENTED 
(SDLC, HOLC, ETC,) PROTOCOLS. THE PURPOSE OF THIS PROGRAM IS 
TO PERFORM BASIC DIAGNOSTIC TESTING OF THE VI/ , FIFO, 
ANO USYRT CBCP/BOP MOOES) ON THESE BOARDS. THE FOLLOWING 
FACTIONS WILL BE PERFORMED; USYRT REGISTER ADDRESSING, 
USYRT REGISTER STATIC BIT INTERACTION ANO READ/WRITE TESTING, 
ANO BASIC BOP ANO BCP TX TESTING (USING THE TSO STATUS HIT). 

THE STATIC LOGIC TESTS WILL PROVIDE EXTENSIVE 
TROUBLESHOOTING CAPABILITIES. SUCH AS TIGHT SCOPE LOOPS, 
SWITCH OPTIONS, AND ABILITY TO "LOCK" ONTO INTERMITTENT 
ERRORS. IN ADDITION TESTS ARE DESIGNED ANO STRUCTURED 
TO ACHIEVE MAXIMUM FAULT RESOLUTION ANO FACILITATE 
REPLACEMENT Of THE SMALLEST FIELD REPLACEABLE UNIT. 

THIS PROGRAM IS IMPLEMENTED USING THE DIAGNOSTIC SUPERVISOR 
ANO A STRUCTURED PROGRAMMING APPROACH. BECAUSE THE DESIGN 
CONFORMS TO THE SUPERVISOR I STANDALONE VERSION) THE PROGRAM 
IS COMPATIBLE WITH ACT, APT, XXDP», ANO SLIDE. 

THROUGH DIALOGS WITH THE OPERATOR, THE PROGRAM ALLOWS 
MODIFICATION OF DEVICE PARAMETERS. SUCH AS LSI-BUS ADDRESS, 
VECTOR AOD«ESSES ANO DEVICE PRIORITY. IN ADDITION, THE 
OPERATOR CAN SPECIFY PARTICULAR TESTS TO BE RUN ANO A 
VARIETY OF LOOPING, RUNNING. ANO REPORTING MOOES. 

DEVICE ERRORS WILL BE REPORTED AS THEY OCCUR. THE REPORT 
WILL INCLUDE A TEST NUMBER ANO DESCRIPTION OF THE ERROR. 
GOOD ANO BAD TEST DATA, ANO APPLICABLE DEVICE REGISTER 
CONTENTS, 

2.0 HARDWARE REQUIREMENTS 

THE FOLLOWING HARDWARE. IS REQUIRED TO RUN THF M8053/Q064 STATIC 
LCGIC TESTS: 

SBC -11/21* 

16K WORDS OF MEMORY 

CONSOLE TERMINAL 

M8053 OR M8064 COMMUNICATIONS INTERFACE 

3.0 PRELIMINARY PROGRAM REQUIREMENTS 

THIS PROGRAM (CNOMC) SHOULD BE THE THIRD OF THE FIVE DMV - 1 1 
STATIC DIAGNOSTICS TO BE RUN (CNOMA/CNOMB SHOULO BE RUN FIRST). 
ERRORS FOUNO IN THIS PROGRAM SHOULD BE CORRECTED BEFORE RWNXNG 
AW OF TME OTHER LINE UNIT DIAGNOSTICS CCNDMD OR CNOME). 



-.-sag-. ..-. 
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4,0 GENERAL PROGRAM CONSIDERATIONS 



4.1 DIAGNOSTIC SUPERVISOR 

THIS PROGRAM IS COMPATIBLE WITH THE STANDALONE DIAGNOSTIC 
Sl*>ERVlSOR. ANO MUST BE LOADED TO BE CO-RESIDENT WITH THE 
SUPERVISOR, OR BE PREVIOUSLY COMBINED WITH THE SUPERVISOR 
AND LOADED AS A SINGLE FILE, IN EITHER CASE, THE COMBINED 
PROGRAM WILL NOT EXCEED 16K OF MEMORY. 



SFQ 0005 



4,2 EXECUTION TIME 

THE MAXIMUM TIME REQUIRED TO RUN 
SECONOS PER PASS FOR EACH UNIT, 



THIS PROGRAM IS ABOUT 15 



4.3 XXDP* 

THIS PROGRAM MAY BE LOADED UNDER XXDP*. AND 
DLfrIP MODE OR CHAIN MODE. 



MAY BE RUN IN 



4.4 ACT/SLIDE 

THIS PROGRAM MAY BE LOADED UNDER ACT OR SLIDE ANO MAY BE RUN 
IN DUMP MODE OR CHAIN MODE. 



4.5 APT 

THIS PROGRAM MAY BE LOADED By THE APT SYSTEM 
APT-RD) ANO RUN IN PROGRAM MODE OR SCRIPT MODE. 



(INCLUDING 



4.6 MEMORY MANAGEMENT 

MEMORY MANAGEMENT IS NOT UTILIZED IN T HIS PROGRAM, 

4.7 ERROR LOGGING 

AT THE END OF EACH PASS ON ALL UNITS, THE PROGRAM PRINTS OUT 
THE OJ1ULATIVE TOTAL NUMBER OF ERRORS SINCE THE LAST START OR 
RESTART COMMAND. 

5.0 PROGRAM LOAD MEDIA 

THIS PROGRAM CAN BE LOADED FROM PAPER TAPE USING THE 
ABSOLUTE LOADER OR FROM ACT, SLIOE, OR APT SYSTEMS, OR FROM 
ANY MEDIA SUPPORTED BY XXDP*. WHEN USING THE PAPER TAPE 
ABSOLUTE LOADER, THE PROGRAM SHOULD BE LOADED FIRST, 
FOLLOWED BY THE DIAGNOSTIC SUPERVISOR. WHEN USING XXOP., THE 
01 AGNOSTIC SUPERVISOR SHOULD BE LOADED FIRST, FOLLOWED Bt 
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SEQ 0006 



• HE DIAGNOSTIC PROGRAM, 



6,0 OPERATING .NSTRUC T IONS 



6.1 LOADING AND STARTING PROCEDURES 



6.1.1 LOADING PROCEDURES 

THIS PROGRAM MAY BE LOADED PR; i PAPER TAPE USING THE 
ABSOLUTE LOADER. IT MAY ALSO Bt LOADED FROM ANi XXDP* LOAD 
MEDIA, WHEN LOADED >©ER XXDP*. THE DIAGNOSTIC SUPERVISOR 
WILL BE LOADED AUTOMATICALLY. 



6,1.2 STARTING PROCEDURES 

THE PROGRAM STARTS AT LOCATION 
PROCEDURES TO START THE PROGRAM, 



200. USE STANOARD DEC 



6.1.3 STEPS FOR QUICK AND SIMPLE EXECUTION 

THE DIAGNOSTIC CAN BE EXECUTED STANOALONE UNDER XXDP», 
WITHOUT READING THE REMAINDER Of THIS DOCUMENT. AS FOLLOWS: 

A) LOAD AND START DIAGNOSTIC USING RUN COMMAND 

B) RECEIVE DIAGNOSTIC StPERVISOR IDENTIFICATION ANO PROMPT (DRS-CO 

C) ENTER STA<CR> 

0) ANSWER HARDWARE AND SOFTWARE QUESTIONS 

E) GET END OF PASS MESSAGES OR ERROR MESSAGES 

F) TO END EXECUTION, ENTER CONTROL/C 

6.2 INITIAL DIALOGUE 

AFTER THE PROGRAM ANO THE SUPERVISOR ARE LOADED AND THE PROGRAM 
IS STARTED, THE FOLLOWING IDENTIFICATION IS TYPED : 

DRS LOADED 

DIAG, RUN-TIME SERVICES 

CNDMC-A-0 

Of 11 LINE UNIT TESTS - PART 1 OF 3 

UNIT IS M8053 OR M8064 

DR> 

THE OPERATOR THEN PROCEEDS BY TYPING ONE OR MORE OF THE 
COMMANDS DESCRIBED IN THE FOLLOWING SECTION 6.3. (FOR MORE 
DETAILED INFORMATION. REFER TO THE DIAGNOSTIC SUPERVISOR 
H^CTIONAL SPECIFICATION). 



6.3 PROGRAM OPTIONS 
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SEQ 0007 



♦..5.1 START COMMAND 



STAfRTV TESTS:* TEST LIST » /PASS : 'PASS -CNT > /FLAGS: 
<FLAG-LIST*/EOP: <INCR> 

6.3.1.1 TESTS SUITCH i, /TESTS :* TEST -LIST > ) 

< TEST -LIST* IS A SEQUENCE OF DECIMAL NUMBERS (1:2 ETC) OR 
RANGES OT DECIMAL NUMBERS (1-5:8 10 ETC.) THAT SPECIFY THE 
TESTS TO BE EXECUTED. THE NUMBERS ARE SEP^ATED Br COLONS. 
THE NV^BERS RANGE FROM 1 TO THE LARGEST TFS1 NUMBER IN THE 
DIAGNOSTIC. THEY MAY BE SPECIFIED IN ANY ORDER. TESTS WILL 
BE EXECUTED IN NUMERICAL ORDER REGARDLESS OF THE ORDER OF 
SPECIFICATION. THE DEFAULT IS TO EXECUTE ALL TESTS. ON 

THIS AND ALL SWITCHES, THE ANGLE BRACKETS <> ARE PUNCTUATION 
USED IN THE DEFINITION OT^LY, ANO ARE NOT TO BE TYPED BY THE 
OPERATOR. SEE EXAMPLE AT END OF 6.3.1.5. 

6.3.1.2 PASS SWITCH ( /PASS: <PASS CNT> ) 

<PASS-CNT> IS A DECIMAL NUMBER INDICATING THE DESIRFD NUMBER 
OF PASSES. A PASS IS DEFINED AS THE EXECUTION OF THE FlXL 
DIAGNOSTIC (ALL SELECTED TESTS) AGAINST ALL UNITS SUBMITTED. 
THE DEFAULT IS NON-ENOING EXECUTION. IN THIS CASE EXIT FROM 
THE PROGRAM IS ACCOMPLISHED EITHER BY TYPING A CONTROL/C OR 
BY OCCURANCE OF AN ERROR WITH THE HALT ON ERROR FLAG BEING 
SET. THE EXIT IS A RETURN TO COMMANO MDDE. SEE EXAMPLE AT 
END OF 6,3,1.5. 

6.3.1.3 FLAGS SUITCH ( /FLAGS : <FLAG-LIST> ) 

<FLAG-LIST> IS A SEQUENCE OF ELEMENTS OF THE FORM <FLAG>. 
<FiAG-l>. OR <FLAG*0>. SEPARATED BY COLONS, WHERE <FLAG> HAS 
ONE OF THE FOLLOWING VALUES: 



HOE 

LOE 



IER 
IBE 
IXE 
PRI 
PNT 
80E 
UAM 

ISR 

IDU 
LOT 



HALT ON ERROR, CAUSING COMMAND MODE TO BE 
ENTERED WHEN AN ERROR IS ENCOUNTEREO 
LOOP ON ERROR. CAUSING THE DIAGNOSTIC TO LOOP 
CONTINUOUSLY WITHIN THE SMALLEST DEFINED BLOCK 
OF COOING (SEGMENT, SUBTEST, OR TEST) CONTAIN- 
ING THE ERROR 
INHIBIT ERROR REPORTING 
INHIBIT BASIC ERROR REPORTS 
INHIBIT EXTENDED ERROR REPORTS 
DIRECT ALL MESSAGES TO A LINE PRINTER 
PRINT NUMBER OF TEST BEING EXECUTED 
BELL ON ERROR 

RUN IN UNATTENDED MOOE , BYPASSING MANUAL 
INTERVENTION TESTS 
INHIBI T STATISTICAL REPORTS 
INHIBIT DROPPING OF ^ITS BT DIAGNOSTIC 
LOOP ON TES1 
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SEQ 0008 



THE FLAGS NAMED OR EQUATED TO 1 ARF SET, THOSE EQUATED TO 
ARE CLEARED. A FLAG NOT SPECIFIED IS CLEARED, IF THE FLAGS 
SWITCH IS NOT GIVEN ALL FLAGS ARE CLEARED. SEE EXAMPLE AT 
END Of 6.3.1.5. 



6.3.1.4 END OF PASS SWITCH ( /EOP : < INCR> ) 



<INCR* IS A 
PASSES) IT 



DECIMAL NUMBER INDICATING HOW OFTEN (IN TERMS Of 
IS DFSIRED THAT THE END OF PASS MESSAGE BE 



PRINTED. THE DEFAULT IS AT 
EXAMPLE AT END OF 6.3.1.5. 



THE END OF EVERY PASS. 



itE 



6.3.1.5 EFFECT OF START COMMAND 

THE EFFECT OF THE START COMMAND TS TO INITIATE THE HARDWARE 
PARAMETER DIALOGUE. THE SOFTWARE PARAMETER DIALOGUE, AND 
THEN THE DIAGNOSTIC TESTS THEMSELVES. 

THE HARDWARE PARAMETER DIALOGUE COMMENCES WITH THE QUESTION 
"# UNITS?" TO WHICH THE OPERATOR kEPLIES WITH A DECIMAL 
NLT«ER N FROM 1 TO 16. THE TERM "UNIT" REFERS TO THE DEVICE 
TO WHICH THIS SERIES OF DIAGNOSTICS IS DEDICATED. FOLLOWING 
THIS ARE THE QUESTIONS WHEREBY THE P- TABLES THEMSELVES WILL 
BE 6.UILT. EACH P-TABLE IS A CORE -RESIDENT TA8LE CONTAINING 
ALL THE HARDWARE INFORMATION FOR ONE UNIT. THE OP C RATOR 
MUST SUPPLY N (NUMBER OF UNITS) VALUES FOR EACH QUESTION. 
HE MAY DO THIS BY GIVING ONE ANSWER TO EACH QUESTION (IN 
WHICH CASE THE SERIES OF QUESTIONS WILL BE POSED N TIMES) OR 
BY GIVING N VALUES. SEPARATED BY COMMAS. TO EACH QUESTION 
(SERIES WILL BE POSED ONCE). EACH QUESTION IS FOLLOWED BY 
THE RESPONSE RADIX (D FOR DECIMAL. B FOR BINARY, FOR 
OCTAL, L FOP YES/NO) IN PARENTHESES ANO THE OEFAULT VALUE 
AFTER THE PARENTHESES. 

FOLLOWING THE HARDWARE QUESTIONS ARE THE SOFTWARE QUESTIONS 
TO BUILD THE SOFTWARE TABLES, WHICH DEFINE THE MOOE (QUICK 
VERIFY ETC.) THAT THE DIAGNOSTIC WILL EXECUt'E IN. 

WHEN THE QUESTION "♦ UNITS?" IS ANSWERED. MEMORY STORAGE IS 
ALLOCATED FOR THE P-TA8LES, AND IF THERE IS NOT ENOUGH TO 
ACCOMMOOATE THEM THE MESSAGE " » 00 MANY UNITS" IS ISSUEO. IN 
*>VIS CASE THE DIAGNOSTIC MUST BE EXECUTED MORE THAN ONCE TO 
TEST ALL UNITS. 

EXAMPLE: 

S TA/ TESTS: 1:2 4:6:8 10/PASS ; 3/F cAGS : IER : HOE • 1 : UAM : LOE 



THIS COMMANO 
CONSISTING OF 



WILL CAUSE THREE PASSFS Tu BE MADE, EACH PASS 
TESTS 1.2,3,4,6,6,9, ANO lv EXECUTED AGAINST 
ALL UNITS. THERE IS NO DIFFERENCE BETWEEN SAYING <FLAG» ANO 
SATING <FLAG-1>. THE NOTATION <FLAG-0> IS MEANINGFUL ONLT ON 
A COMMAND OTHER THAN START TO CLEAR A FLAG THAT WAS 
PREVIOUSLY SET. NOTE THAI ON ALL COMMANDS ONLY THE FIRST 



I 1 
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THREE LETTERS ARE SCANNED. 



6.5.2 RESTART COMMAND 

REGC T ART)/ TESTS :< TEST LIST * /PASS : 'PASS CNT > /n AGS : 
<FLAG-llbT>/UNITS;<UNIT LIST ■ 

******+*****♦***+*♦**♦♦***♦♦♦»*♦*******♦+♦****♦*+**+******* 

6.3.2.1 TESTS, PASS, AND FLAGS SWITCHES 

< TEST LIST*, <PASS-CNT>, AND <FLAG-LIST> Af»t AS IN THE START 
COMMAND . 

6.3.2.2 UNITS SWITCH ( /UNITS: 'UNIT LIST > ) 

<UN1T-LIST> IS A SEQUENCE OF DECIMAL NUMBERS (0,1 ETC.) OR 
RANGES OF DECIMAL NUMBERS (0-5, 8-10 ETC.) THAT SPECIFY THE 
UNITS TC BE TESTED. THE NUMBERS ARE SEPARATED BY COLONS. 
THE NUMBERS MAY RANGE FROM THRU N-l (N IS THE NUMBER OF 
UNITS SPECIFIED IN THE PREVIOUS START COMMAND). THE NUMBER 
INOICATES THE POSITION OF THE P-TABLE AS THE DATA WAS 
ENTERED DURING THE HARDWARE DIAGLOGUE. THE UNITS WHICH ARE 
SELECTED MUST NOT HAVE BEEN DROPPED BY THE DROP COMMANO. 
SEE THE DISCUSSION OF ADD AND DROP COMMANDS BELOW. DEFAULT 
IS TO TEST ALL WITS WHICH HAVE NOT BEEN DROPPED BY A DROP 
TOMMANO . 

6.3.2.3 EFFECT OF RESTART COMMANO 

THE RESTART COmANO DIFFERS FROM THE START COMMAND IN THAT 
THE P-TABLES FROM THE PREVIOUS START COMMANO (THERE MUST 
HAVE BEEN ONE) ARE USED. INSTEAD OF NEW ONES BEING BUILT. 
THE UNITS SWITCH GIVE? THE ABILITY TO SELECT A SUBSCT OF 
THESE. THE SOFTWARE DIALOGUE MAY OPTIONALLY BE REEXFCUTED 
(OPERATOR WILL BE ASKED). THE COMMANO CAN BE USED AFTER 
COMMAND MOOE HAS BEEN REENTERED IN ANY OF THE THREE NORMAL 
WAYS: A) fME REQUESTED NUMBER OF PASSES HAVE BEEN MADE B) 
AN ERROR WAS ENCOUNTERED WITH THE HALT ON ERROR FLAG SET C) 
A CONTROL/C WAS ENTERED BY THE OPERATOR. 



6.3.3 CONTINUE COMMANO 



CON(TINUE)/PASS:< PASS -CNT /FLAGS: 'FLAG -LIST* 

6.3.3.1 PASS SWITCH ( /PASS : <PASS CNT O 

<PA'jS-CNT> IS SAME AS IN START COMMANO, HUT THE DEFAULT I 
THE UNSATISFIED PASS -CNT FROM THE PREVIOUS START OR RESTART 



SEQ 0009 
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I* NONE RFMAINS, THE DEFAUl T IS NON ENDING EXECUTION. 



6.3.3.2 FLAG SWITCH ( /FLAGS : <F I AG -L 1ST > ) 

<H.AG-LIS'> IS SAME AS IN START COMMAND, BUI UNSPECIFIED 
FLAGS RETAIN THEIR CURRENT VALUF . 

6.3.3.3 EFFECT OF CONTINUE COMMAND 

CONTINUE MUST FOLLOW A STAR' OR RESTART. AND COMMAND MODE 
MUST HAVE 3EEN ENTERED GUE TO A HALT ON ERROR OR A 
CONTROL/C. THE EFFECT OF THE COMMAND IS TO GO 10 THE 
BEGINNING OF THE TEST THAT WAS BEING EXECUED WHEN THE HALT 
OR CONTROL/C TOOK PLACE. SOFTWARE DIALOGUE MAY OPTIONALLY 
BE REEXFCUTED. HARDWARE PARAMETERS MAY NOT BE CHANGED, 



6.3.4 PROCEED COMMAND 



PRO(CEED)/FLAGS: <FLAG-LIST> 



6.3.4.1 FLAGS SWITCH ( /FLAGS r <FLAG-LISTO 

<FLAG-LIST> IS AS IN THE START COMMAND, BUT UNSPECIFIED 
FLAGS RETAIN THEIR CURRENT VALUE. 

6. 3. 4. a EFFECT OF PROCEED COMMAND 

PROCEED MUST FOLLOW A START, RESTART, OR ^ONlINUE. COMMANO 
MOOE MUST HAVE BEEN ENTERED VIA A HALT Of' ERROR. THE EFFECT 
OF THE COMMAND IS TO BEGIN EXECUTION AT THE LOCATION 
FOLLOUING THE ERROR CALL. NEITHER HARDWARE NOR SOFTWARE 
PARAMETERS MAY BE ALTERED, 



6.3.5 ADD COMMANO 



ADD/UNITS:<UNIT-LIST> 

6.3.5.1 UNITS SWITCH ( /UNITS: <UNIT -LIS T> 
<UNIT-LIST> IS AS IN 1HE RESTART COMMAND. 

6.3.5.2 EFFECT OF ADD COMMANO 

THE WITS SPECIFIED ARE ADDED TO THE TEST SEQUENCE. EACH 
UNIT MUST HAVE A P- TABLE IN MEMORY DUE TO AN EARLIER 



SEQ 0010 



CNOMCAO DMVU I INE UNIT DIAGl 
PROGRAM DOCUMENT 

51? 
513 
514 
515 
516 
51? 
5.8 
■-'.19 
520 
521 
52? 
523 
524 
525 
526 
527 
528 
529 
530 
531 
532 
533 
534 
535 
536 
537 
538 
530 
540 
541 
542 
543 
514 
645 
546 
54 7 
548 
549 
550 
551 
552 
553 
55>. 
555 
556 
557 
558 
559 
560 
561 
562 
563 
564 
565 
566 
567 
568 
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HARDWARE DIALOGUE. THIS COMMAND MUST BE FOLLOWED Br A 
RESTART OR CONTINUE. THE UNI T ' SWITCH MUST BE SPECIFIED. 
THE ADD COMMAND IS MEANINGFL-c JNLY FOR UNITS THAT WERE 
PREVIOUSir DROPPED. 



6.3.6 DROP COMMAND 

************♦***♦******♦+***♦•***+♦***#♦*♦♦♦♦♦**++*+♦♦*♦*** 
DR0CPVUNITS:<UNIT-LIST>> 

**************** ...**** + ************************** + ++*** + **** 



6.3.6.1 UNITS SWITCH ( /UNITS: <UNIT -LIST > ) 
<UNIT-LIST> IS AS IN THE RESTART COMMAND. 

6.3.6.2 EFFECT OF DROP COMMAND 

THE LWITS SPECIFIED WILL BE DROPPED FROM TESTING. THE UNITS 
WILL BE RESELECTED ONLY BY THE EXECUTION OF AN ADD OR START 
COMMAND. THE UNITS SWITCH MUST BE ENTERED. THIS COMMAND 
MUST BE FOLLOWED BY A RESTART OR A CONTINUE COMMAND, 

6.3.7 PRINT COMMAND 

a*****************************************************. **** 

PRICNT) 

*♦.. ***************************************************** 

6.3.7.1 EFFECT OF PRINT COMMANO 

THE TOTAL NUMBER OF ERRORS FOR EACH UNIT SINCE THE LAST 
START OR RESTART COMMANO ARE PRINTED. THE ISR C INHIBIT 
STATISTICAL REPORTING) FLAG IS CLEARED, 

6.3.8 DISPLAY COMMAND 

♦A********************************************************* 

DISC PLAY )/UNITS :<UNIT-L 1ST > 

********************************A ■ ************************ 

6.3.8.1 UNITS SWITCH ( /UNITS: <UNIT -LIST > ) 
<UNIT-LIST> IS AS IN THE RESTART COMMAND. 

6.3.8.2 EFFECT OF DISPLAY COMMAND 

THT HARDWARE P- TABLES FOR ALL UNITS UNOER TEST ARE PRINTED 
OUT IN THE FORMAT IN WHICH THEY WERE ENTERED. ANY UNITS 
THAT WERE DROPPED B* THE OPERATOR "DROP" COMMAND ARE SO 



SEO 0011 



r 1 



CNDMCAO DMVil LINE UNIT DIAGl 

PROGRAM DOCUMEMi 

569 
570 
571 
572 
573 
574 
575 
576 
577 
578 
57V 
580 
581 
582 
585 
584 
585 
586 
587 
588 
589 
590 
591 
592 
593 
594 
595 
596 
597 
598 
599 
600 
601 
602 
603 
604 
605 
606 
607 
608 
609 
610 
611 
612 
613 
614 
615 
616 
617 
618 
619 
620 
621 
622 
623 
624 
625 
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DESIGNATED. 

6.3.9 FLAGS COMMAND 

* + + ***.** + * + *****4.* + ******4±****4******4* + ** + ** + + + + * + ** + * + #« 
FLA(GS) 

4************* + ******** + +,*****4** + * + **4**** + * + * + **** + *** + ¥ + 

6.3.9.1 EFFECT OK FLAGS COMMAND 

THE CURRENT SETTINGS OF ALL FLAGS ARE PRINTED. 

6.3.10 ZFLAGS COMMAND 

4******«*+************+**««**************************4***** 

ZFL(AGS) 

4*************************4** **************4***********4*44 

6.3.10.1 EFFECT OF ZFLAGS COMMAND 
ALL FLAGS ARE CLEARED, 

6.3.11 CONTROL CHARACTERS 

A CONTROL f. CO ENTERED DURING THE EXECUTION OF A DIAGNOSTIC CAUSES 
A RETURN TO COMMAND MODE. 

A CONTROL Z (Z) ENTERED DURING ONE OF THE THREE OPERATOR 
DIALOGUES- HARD COPE QUESTIONS CSEE 6.2) .HARDWARE DIALOGUE 
(SEE 6.3,1.5), OR SOFTWARE DIALCXSUE (SEE 6.3.1.5) CAUSES THE 
DEFAULTS TO BE TAKEN FOR THE REMAINDER OF THAT DIALOGUE. 

A CONTROL (0) ENTERED DURING THE EXECUTION OF A DIAGNOSTIC 
CAUSES ALL TELETYPE OUTPUT TO BE SUPPRESSED FOR THE 
REMAINDER OF THE DIAGNOSTIC OR UNTIL ANOTHER IS TYPED, 
WHICH RESTORES NORMAL TELETYPE OUTPUT. 

6.3.12 HARDWARE PARAMETERS 

THE FOLLOWING 3 QUtSTIONS WILL BE ASKED ON A START COMMAND. 
THE VALUE LOCATED TO THE LEFT OF THE QUESTION MARK IS THE 
DEFAtAT VALUE THAT WILL BE TAKEN ON A CARRIAGE RETURN 
RESPONSE. 

1. DEVICF CSR ADDRESS : (0) 160020? 

THIS 1. ' «" ADDRESS AT WHICH THE CSR REGISTERS (StLO) RESIDE 
ON THE LSI -BUS. THE ALLOWABLE RANGF IS 160020-177760 
(OCTAL), AND THE DEFAULT VALUE IS 16OO20. 

2. DEVICE VECTOR ADDRESS ; (0) 500 ? 



CNDMCAO DMV11 LINE UNIT QIAGl 

PROGRAM DOCUMENT 

626 

628 

629 

650 

631 

t>32 

633 

b34 

635 

636 

637 

636 

639 

600 

641 

642 

643 

644 

645 

646 

64 7 

648 

649 

650 

651 

652 

653 

654 

6*^5 

o56 

657 

653 

659 

660 

661 

662 

663 

664 

665 

666 

667 

668 

669 

670 

671 

672 

673 

674 

C75 

676 

67 7 

673 

679 

6eo 

681 
6*12 
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SEQ 0013 



THIS IS Trit ADDRESS Or THE INPUT INTERRUPT VECTOR TOR THIS 
DEVICE, THE ALLOWABLE RANGE 15 000-674 (OCTAL), AND THE 
DEFAULT VALUE IS 300. 



3. 



DEVICE PRIORITY LEVEL ; (0) 4 ? 



THIS IS THE CPU PRIORITY AT WHICH THE INTERRUPT HANDLL.33 OF 
THIS DEVICE WILL BE EXECUTED. THE ALLOWABLE RANGE. IS 0-7, 
AND THE DEFAULT VALUE IS 4. 

4. SWITCH PACK * 1 (BOOT ADDRESS): (0) ? 

5. SWITCH PACK 2 CDDCMF ADDRESS): (0) ? 

THESE REPRESENT THE TWO USER MODIFIABLE 8 POSITION DIP-SWITCHF.S , 
THE ALLOWABLE RANGES FOR BOTH ARE 000-377 (OCTAL), AND THE DEFAULTS 
ARE BOTH 0. 

6. BOARD TYPE (0-M8064, 1-H8053-V35, 2-M8053-EIA) : (0) ? 

THIS IS THE TYPE OF QMV-11 CURRENTLY INSTALLED. NOTE THAT THE 
M8053 IS SWITCH SELECTABLE BETWEEN V.35 AND EIA. 

7. BAUO RATE CO-LOW (19. 2K), 1-HIGH C56K)); 

THIS IS THE SPEED AT WHiCH THE DMV TRANSMITS AND RECEIVES DATA. 
IN THE UNIT IS AN M8064. THE ANSWER IS IGNORED (DEFAULTS TO 56K). 
IF THE UNIT IS AN M8053, THEN THE ANSWER SHOULD BE BASED ON THE 
"SPFED SELECT SWITCH" LOCATtD ON THE BOARD. 

6.3.13 SOFTWARE PARAMETERS 

NO SOFTWARE PARAMETER QUESTIONS ARE ASKED B v PART 1 OF THE 
STATIC LOGIC TESTS. 

6.3.14 EXTENOED DISCUSSION OF P-TA8LE DIALOG* * 

THE FULL CAPABILITY OF THE HARDWARE DIALOGUE IS REVEALED BY 
THE FOLLOWING DISCUSSION OF WHAT HAPPENS INTERNALLY. 

AS SOON AS THE QUESTION "0 UNITS?" l'S ANSWERED (WITH THE 
NUMBER N. SAY) SPACE IN CORE IS ALLOCATED FOR N P- TABLES. 
ALL OF THE P- TABLES ARE CF THE SAME FORMAT, AMO THERE IS A 
ONE -TO ONE CORRESPONDENCE BETWEEN THE HARUidAPfc" PARAMETER 
QUESTIONS AND THE SLOTS IN THE P-TABLE FORMAT, 

ON THE FIRST TRIP THRU THE QUESTIONS. ALL OF THE SLOTS IN 
ALL OF THE P-'ABLES ARE FIiLED. IF THE OPERATOR Tt-IS IN 

LESS THAN N EXPLICIT VALUES IN RESPONSE TO A PARTIC'A.Afc 
QUESTION, THESE VALUES ARE PLACED IN THE P TABLES (ONE VALUE 
GOING INTO THE PROPER SLOT OF EACH P-TABLE BEGINNING WITH 
THE FIRST P-TABLE) UNTIL THE STRING OF VALUES IS EXHAUSTED. 
THE LAST VALUE IN THE STRING BECOMES THE NEW DEFAULT AND IS 
USED TO FILL THAT SLOT IN THE REMAINING P-TABLES, 






CNDMCAO DMVll LINE UNH DIAG1 
PROGRAM DOCUMENT 
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683 
634 
685 
686 
68? 
688 
b89 
690 
b91 
692 
693 
694 
695 
696 
69? 
698 
699 
TOO 
701 

7 02 

703 
704 
705 
706 
707 
708 
709 
710 
711 
71? 
713 
?14 
715 
716 
717 
718 
719 
720 
721 
72? 
723 
724 
725 
726 
727 
728 
729 
730 
''51 
73? 
733 
7 34 
735 
736 
73 7 
738 
739 



ON SUBSEQUENT TRIPS THRU THE Q'.^STIONS. THE SAME PROCESS IS 
CARRIED OUT. EXCEPT THAT THE EARLIEST P- TABLE NOT TO HAVF 
RECEIVED AN EXPLICIT VALUE IN ANY OF ITS SLOTS NOW ASSUMES 
THE ROLE THAT TABLE NUMBER ONE PLAYED IN THE FIRST TRIP. 

THE SERIES Of QUESTIONS IS REISSUED UNTIL AT LEAST ONE 
QUESTION HAS RECEIVED N EXPLICIT VALUES FROM THE OPERATOR. 

IN GIVING A STRING OF VALUES. COMMAS WITHOUT INTERVENING 
VALUES MAY BE USED TO INDICATE A kF.PETITION OF THE LAST 
NAMED VALUE. 

A STRING OF VALUES MAY BE GIVEH AS A RANGE (6-10 FOR 
EXAMPLE). IF THE VALUES REPRESENT PURE NUMERICAL DATA, THIS 
SAMPLE RANGE TRANSLATES TO THE STRING 6.7,8.9,10 (AN 
INCREMENT OF 1) . IF THE VALUES APE ADDRESSES. THE SAMPLE 
RANGE TRANSLATES TO THE STRING 6,8.10 CAN INCREMENT OF 2). 



NOW LET US 
CONSTRUCT A SE 
ANO THAT THERE 
SLOTS IN THE 
DIALOGUE). LE 
THE NUMBER 75 
THE SECOND 

(0,1,2 15) 

VALUE 11. LE 
THE WJMBER 76 
THE LAST 9 UNI 



SEE HOW WE COULD USE THESE CAPABILITIES TO 

T OF P-TA8LES. ASSUME THAT WE HAVE 16 UNITS, 

ARE THREE HARDWARE PARAMETERS FOR EACH ( THREE 

P- TABLE, THREE HARDWARE QUESTIONS IN THE 

T THE DESIRED VALUE FOR THE FIRST PARAMETER BE 

FOR ALL 16 TABLES. LET THE DESIRED VALUE FOR 

PARAMETER BE EQUAL TO THE UNIT NUMBER 

EXCEPT FOR UNIT 12, WHICH SHOULD RECEIVE THE 

T THE DESIRED VALUE FOR THE THIRD PARAMETER BE 

FOR THE FIRST 7 UNITS AND THE NUMBER 77 FOR 

TS. 



THE FOLLOWING DIALOGIC WOULD ACCOMPLISH THIS GOAL 

9 UNITS (D) ? 16 
.UNIT 

<QUESTION 1> ? 75 
'QUESTION 2> ? 0-6 
<QUESTION 3> ? 76 



UNIT 7 
<QUESTION 
<QUESTION 
<QUESTION 



1> 
3> 



7-li. 

77 



13-15 



THE FIRST TIME THE SERIES IS ASKED, SLOT ONE RECEIVES A 75 
IN ALL 16 TABLES. SLOT TWO RECEIVES THE VALUES 0.1, 2,.... 6 
IN TABLES THRU 6 AND A CONSTANT 6 IN TABLES 7 THRU 15. 
SLOT THREE RECEIVES A CONSTANT 76 IN ALL 16 TABLES. 

THE SECONO TIME THRU THE SERIES, TABLES 7 THRU THE END ARE 
GOING TO BE AFFECTED (NOTE THAT THIS PIECE OF INFORMATION IS 
PRINTED OUT FOR THE THE OPERATOR IN THE FORM "UNIT XX" AT 
THE BEGINNING Of trtCH SERIES). QUESTION 1 IS RESPONDED TO 
BY P, <CR>, SO SLOT Oft STAYS AT CONSTANT 75 IN TABLES 7 
THRU 15, SINCE NO NEW EXPLICIT VALUES ARE TYPED IN. SLOT TWO 
GETS THE VALUES 7.8.9,10,11 IN TABLES 7 THRU 11, ANO 
GETS AN U IN SLOT 12. ANO GETS TrtF; VALUES 15,14.15 IN 



TABLES -13-- THRU- -1-5-. SLOT THREE 



GETS 



THE VALUE 77 IN TABLES V 



CNOMCAO DMV11 l.TNfc UNH DIAGl MACRO ML>00 .V CFB-84 1S:M PAUF f, 10 
PROGRAM DOCUMENT 

740 IHRU 1',, 

741 

"4-: ThF DIALOGUE lb TERMINAThD WHEN THE SOFTWARE Rl CO(.NI/FS THAT 

7 «? 16 FXPl ICTT VAIUF.S HAVE BEEN GIVEN TQR AT LEAST ONE QUESTION 

7*4 (NAMELY QUESTION ^). 

74S 

"46 



f jEQ 001S 
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748 

M9 

750 
751 

752 
755 
'54 
'55 

756 
757 
758 
759 
760 
761 
762 
76? 
764 
765 
766 

76 ,' 
768 
769 
7/0 
771 

n? 

775 
7/4 
7/5 
776 

77 7 
7 78 
779 
780 
781 
782 
783 
784 
785 
786 
787 
788 
789 
790 
791 
792 
793 
794 
795 
796 
/97 
798 
799 
800 
801 
802 
803 
804 



7.0 TEST DESCRIPTIONS 

j* TEST 1 <TBMT MICROCODE INTERRUPT TEST> 

J ♦ 

;* THIS TEST CHECKS THE OPERATION OF THE TBMT (IRQ) INTERRUPT. 

;♦ THIS IS DONE BY ISSUE ING THE "SET MAINTENANCE INTERRUPT FLAG ANO CLEAR 

{♦ INTERRUPT DISABLE IN PROCESSOR STATUS" COMMAND WHILE IN THE MAINTENANCE 

I* LOOP AND THEN CHECKING FOR BIT 7 Of BJEL3 TO BE SET (THE: BIT IS SET 

j* BY THE MICROCODE WHEN THE. TBHT INTERRUPT OCCUR!.). 

♦ TEST 2 <SWITCH SETTING TEST> 

* 

♦ SUBTEST *1; 

♦ THE TWO READABLE SWITCH PACKS WlLu BE SAMPLED ANO COMPARED AGAINST THE 2 

♦ VALUES IN THE P-TABLE. AN ERROR IS REPORTED ON A MISMATCH. 

■* 

♦ SUBTEST *2: 

♦ THE SPEED SELECT SWITCH CSPDSEL) IS READ VIA THE VIAORA REGISTER (BIT PA4) 

♦ AND COMPARED AGAINST THE BAUD RATE VALUE IN THE P- TABLE. IF A MISMATCH 

♦ OCCURS IT WILL BE REPORTED. NOTE: THIS SUBROUTINE IS NOT RUN IE AN M8064 

♦ BOARD IS BEING TESTED (IT ONLY RUNS 56K . . , MAKING A SPEED SWITCH USELESS). 
♦ 

♦ THIS TEST IS ONLY RUN ON THE FIRST PASS AFTER A "START" OR "RESTART". 

♦ ALL SUCCESSIVE PASSES WILL SKIP THIS TEST. 



TEST 3 <USYRT MASTER CLFhR TEST- 

ALL REGISTERS ARE LOADED WITH PATTERN E IN THE SAME St 'JUF.NCF AS FOR 
PATTERN F BELOW. THE U^YRT IS THEN CLEARED BY A MASTER CLEAR 
(BIT 6 OF BSEL 1). ALL REGISTERS ARE THEN CHECKED FOR THE PROPER CONTENTS. 
THE INITIALIZED STATE OF THE REGISTERS IS CHECKED AGAINST DATA PATTERN F. 



* 



PATTERN Ei 377, 377, 377, 377. 377, 377, 377, 366. 
PATTERN F: OOO, 000, 000, 000, 000, OOO, 000, 110. 

SEQUENCE OF REGISTERS AS USED WITH PATTERNS F. £ F : 

RDSRL, RDSRH, TDSRL , TDSRH. PCSARL, PCSARH, PCR, USYRT STATUS REG 



TEST 4 <USYRT PROGRAM RESET TEST* 

ALL REGISTERS ARE LOADED WITH PATTERN E IN THE SAME SEQUENCE AS >■ ON 
PATTERN F BELOW. THE USYRT IS THEN RESET BY ASSERTING PROGRAM RESET 
(BIT 3 AOOO) IN THE 6522 VIA. ALL REGISTERS ARE THEN CHECKED FOR 



CNDMCAO DNV11 I INfc UN1 1 DIAGi 
PROGRAM DOCUMENT 

80s 

80^ 
80? 
808 
809 
810 

an 

<U2 
824 
814 
815 
816 
81 ? 
818 
819 
820 
821 
622 
823 
824 
825 
826 
827 
823 
829 
830 
831 
832 
833 
834 
835 
836 
83? 
838 
839 
840 
841 
842 

843 

844 
845 
846 
847 
848 
849 
850 

551 

852 

853 
854 
855 
856 

857 

858 
859 
860 
861 
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THE PROPER CONTENTS. THE TNITIALI/ED STATE OF THE REGISTERS IS CHECKED 
AGAINST DATA PATTERN F. 

PATTERN E: 377, 377, 377, 377, 377, 377, 37/, 366. 
PATTERN Ft 000, 000, 000, 000, 000, 000, 000, 110. 

SEQUENCE OF REGISTERS AS USED WITH PATTERNS E 6 F; 

RDSRL. RUSRH, TDSRL, TDSRH, PCSARL, PCSARH, PCR, USYRT STATUS RE-.fi 



* 

* 
* 

4 
4 
444*444*4444*4444444444*4444*444**4*A44444444444**44+444*44444444444444»»**** 

444***4********444444*4444***4 4* 44>44*4******44**4**4***4*44*444444*4***44444* 

♦ TEST 5 <USYRT REGISTER ADDRESSING TEST> 

4 

♦ FIRST, A MASTER CLEAR IS ISSUEO, TO INITIALIZE THE USYRT REGS TO 

♦ PATTERN F. THEN. EACH REGISTER IS WRITTEN WITH A BYTE OF PATTERN J, 
4 ANO AFTER EACH IS WRITTEN, ALL ARE READ AND COMPARED TO THE CURRENT 

♦ EXPECTED VALUES. THIS IS PERFORMED FOP ALL REGISTERS - INCLUOING THE 

♦ READ ONLY REGS -- IN ORDER TO MAKE SURE THAT EACH REGISTER ONLY RESPONDS 

* TO ITS OWN ADORESS. 

* PATTERN Ft 000, 000, 000, 000, 000, 000, 000, 110 

* PATTERN J; 000. 000, 001, 002, 004, 020, 040, 010 

4 

* SEQUENCE OF REGISTERS AS USED WITH PATTERNS F 6 J; 

* RDSRL. ROSRH, TDSRL, TDSRH, PCSARL, PCSARH, PCR, USYRT STATUS REG 

j44 44****4444**44*44444444444*4444444444444*444444444444444*444A44*44444*44*** 



•444444444444444444444*44444444444444444444444444444444444444 44 4444*4**4444*44 

;* 
;* 
;♦ 
i* 
;* 
{♦ 

; 4***444*******4444***44**4***444*44*444444***4444*44**44*44**44*4444444444444 



TEST 6 <R/W BIT TEST OF PCSAR HIGH BYTE> 

WRITE, READ, ANO COMPARE EACH WORD OF OATA PATTERN G. 

PATTERN Gt 000, 001, 003, 004, 005, 007, 100. 101, 103, 104, 105. 
107, 000, 017, 027, 041, 200. 277, 103. 144. 115. 157, 000. 



j* TEST 7 <R/W BIT TEST OF S/AR REGISTER> 

}* 

j* WRITE, READ, AND COMPARE EACH WORD OF DATA PATTERN M. 

;♦ 

j* PATTERN H: 125, 252, 000, 377, 000. 001, 002, 0O4 , 010, 020, 040, 100, 

;* 200, 000, 377, 376, S7S, 373, 367, 357, 337, 277, 177, 377. 

;♦ 000 

;444*44*4444444444444444*44***44**444444**44*44*44*44**44*444444444*4444444444 
• 44***44*44444*4444444****444444444444444444444444*444444*444444*444444444 44.*.*. 

I* TEST 8 <R/W BIT TEST OF PCR REGISTER* 

;♦ 

;4 PATTERN X IS LOADED INTO PCR (HIGH) AND THE DATA READ BACK AND 

;♦ CHECKED* 

J* 
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86? 
863 
664 
865 
866 
867 
868 
<<69 
870 
871 
872 
873 
874 
875 
8 76 
811 
878 
679 
880 
881 
882 
883 
884 
885 
886 
887 
888 
889 
890 
891 
892 
893 
894 
895 
896 
897 

898 
899 
900 
901 
902 
903 
904 
905 
906 
907 
908 
909 
910 
911 
912 
913 
914 
915 
916 
917 
918 
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;♦ PATTERN I: 000. 041. 102. 143. 204. 245. 306, 34 7 , 000, 001, 002, 

;♦ 004, 040, 100, 200, 000. 346, 345, 343, 307, 247, 147, 347, 242. 

;♦ 105, 347, 010, 020, 367. 357, 030. 027, 377. 
;* 



SEQ 0018 



*♦♦♦ 



TFST 9 <R/W BIT TEST OF TDSR REGISTER'S HIGH BYTE> 

PATTERN l< IS LOADED INTO TDSR (HIGH) ANO THE OATA READ BACK I c , 
COMPARED AGAINST PATTERN L. (UNPREDICTABLE BITS ARE MASKED OFF TO 
WHEN READING FOR COMPARISON.) 

PATTERN K: 000, 377, 376, 375, 373, 376, 177, 377, 000. 001. 002, 
004, 010, 200. 125, 252, 000. 

PATTERN L: 000, 017, 016. 015. 013, 016, 017. 017, 000. 001, 002, 
004. 010, 000, 005, 012, 000. 

NOTE THAT THE UNDEFINED BITS (12, 13, £ 14) ARE MASKED DTK TO OS 
FOR THE COMPARISON. ALSO THAT BIT IS IS A READ/ONLY BIT AND CAN'T BE 
SET -- THEREFORE SHOULD ALWAYS BE Rf.AD AS A BY THIS TEST. 



* 

4 

* 

J* 
;* 
J* 

;* 

;* 

;4**4*44*444*4444444444444444444*4444.*.4*444*4**4*4*44***4****444*444**44*«**4 

;♦ TEST 10 <R/U BIT TEST OF TXD6 REGISTER* 

;♦ WRITE. READ. AND COMPARE EACH WORL OF DATA PATTERN H. 

;♦ 

j* PATTERN H; 000. 001. 002, 004, 010. 020, 040, 100, 200, 000, 377, 

I* 376, S75, 373, 36?, 357, 337, 277, 177. 377, 000 

l4*******++*****4****#4 ; ***********44**********AA*4***4***+*4+***************4* 



TEST 11 <PSEU00 R/W BIT TEST Of RXDB> 



»♦ 
I* 

j* WRITE. READ (BUT NO COMPARE) Of EACH WORD IN DATA PATTERN H, THIS IS 

;♦ PRIMARILY TO PROVIUE A SCOPE LOOP FUNCTION ON THIS REGISTER. 

j* PATTERN H: 000, 001, 002, 004, 010, 020, 040. 100. 200, 000. 377, 

i* 376, 375, 3/3, 367, 357, 337. 277, 177, 377, 000 

;»**+*»**** ** **************************A***A***A***+**A**4*A****4***********A* 



;♦ TEST 12 <PSEU00 R/W BIT TEST OF RDSR'S HIGH BYTE> 

J* 

;♦ WRITE. READ (BUT NO COMPARE) OF EACH WORD IN DATA PATTERN H. THIS IS 

j* PRIMARILY TO PROVIDE A SCOPE LOOP FUNCTION ON THIS REGISTER. 

I* 

}♦ PATTERN H; 000, 001, 002, 004, 010, 020, 040, 100. 200, 000, 377, 

{* 376, 375, 373, 367, 357, 337, 277, 177, 377, 000 
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919 
920 
921 
92? 
923 
924 
925 
->26 
927 
928 
929 
930 
931 
932 
933 
934 
935 
936 

93 7 
938 
939 
940 
941 
942 

94 3 
944 
945 
946 
94 7 
948 
949 
950 
951 
952 
953 
954 
955 
956 
957 
958 
959 
960 
961 
962 
963 
964 
965 
966 
967 
968 
969 
970 
971 
97? 
9/3 
9 74 
975 
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TEST 13 <NULL CLOCK TEST> 

FIRST, A MASTER CLEAR IS DONE TO INIT THE OMV. THEN, THE U TIMER ON THE 
VIA CHIP IS PROGRAMMED FOR SQUARE WAVE CLOCK GENERATION ON PB7 (BIT 7 
OF VIA OUTPUT REG B), UITH A BAUD RATE - 56 KBAUD. THIS IS THE MODE OP 
VIA OPERATION WHICH IS USED TO GENERATE THE NULL CLOCK, THEN, THE PROGRAM 
SCANS ORB REPEATEDLY TO MONITOR THE NULL CLOCK BIT, IN THE FOLLOWING 
SEQUENCE : 

- THE PROGRAM REPEATEDLY CHECKS THE NULL CLOCK BIT FOR THE 1 STATE, AND 
IF IT IS NOT FOUND WITHIN SEVERAL HUNDRED MICRO -SEC (A GROSS TIMEOUT 
INTERVAL). AN ERROR IS REPORTED. (AT 56 KBAUO, THE CLOCK SHOULD 

HAVE A PERIOD OF ABOUT 18 MICRO-SEC.) 

- THE PROGRAM NEXT REPEATEDLY CHECKS THE NULL CLOCK BIT FOR THE STATE, 
AND IF IT IS NOT FOUND WITHIN SEVERAL HUNDRED MICRO-SEC, AN ERROR IS 
REPORTED. 

- THE PROGRAM NEXT REPEATEDLY CHECKS THE NULL CLOCK BIT FOR THE i STATE 
AGAIN, AND IF IT IS NOT FOUND WITHIN SEVERAL HUNDRED MICRO-SEC, 

AN ERROR IS REPORTED. 

* + + + ****♦*********************•*♦•*♦**♦*♦**♦ ♦**#**#****«4*****4.A*********A** 

TEST 14 <BCP TX RESET W/IDLE ■ 0> 

THE USYRT IS INITIALIZED FOR "BYTE -CONTROL PROTOCOL" (BCP) WITH IDLE 
SET TO ZERO AND A 125 SYNC CHARACTER IS LOADED INTO S/AR. A 226 SYNC 
CHARACTER IS LOADED INTO TXDB SO THAT THE SOURCE OF SYNC CHARACTERS 
CAN BE LATER DETERMINED. THE VALID STATE OF THE USYRT REGISTERS IS 
READ ANO CHECKED. TXE IS ASSERTED TO ENABLE THE TRANSMITTER LOGIC. 

THEN. TSOM IS ASSERTED AND TXC IS MANUALLY STEPPED WHILE OBSERVING 
TXA -- IT SHOULD BE ASSERTED WITHIN TWO (2) CLOCK CYCLES. 

CTXBE SHOULD GO HIGH* AT THIS TIME THE S/AR'S SYNC CHARACTER SHOULD 
BE LOADED INTO TXSO AND TSOM IS AGAIN SET -- DRIVING TXBE LOW.) 

THREE SYNC CHARACTERS ARE SENT/RECEIVED: THE FIRST TWO SYNCHRONIZE 
THE RECEIVER. THE THIRD IS DIRECTLY READ (STRIP SYNC IS OFF) ANO 
COMPARED AGAINST 125 (THE S/AR SYNC CHARACTER). 

IF VALUE REAO IS 226. THEN TXD6 PROVIDED THE SYNC (IE: ERROR). 

THE USYRT IS THEN RESET AND REGISTERS ARE AGAIN REAO AND CHECKED. 

THIS TEST WILL GO NO FURTHER INTO THE TRANSMIT SEQUENCE SO THAT ONLY 
ONE MARK ANO THREE SYNC CHARACTERS (FROM THE S/AR) IS TRANSMITTED. 

ERROR LOOPING WILL DEPENO ON WHERE THE FIRST ERROR OCCURS WITHIN THE 
SEQUENCE, 



SEQ 0019 



TEST 15 <BCP TX RESET W/IDLE • 1> 



THE 
SET 
THE 



USYRT IS INITIALIZED FOR "BYTE-CONTROL PROTOCOL" (BCP) WITH IDLE 
TO ONE ANO A 226 SYNC CHARACTERS LOADED INTO S/AR AND TXDB . 
VALID STATE OF THE USYRT REGISTERS IS READ ANO CHECKED. TXE IS 
ASSERTED TO ENABLE THE TRANSMITTER LOGIC. 

THEN, TSOM IS ASSERTED ANO TXC IS MANUALLY STEPPED WHILE OBSERVING 
TXA -- IT SHOULD BE ASSERTED WITHIN TWO (?) CLOCK CYCLES, 
(TXBE SHOULD GO HIGHj AT THIS TIME THE TXDB SYNC CHARACTER SHOULD 



CNDMCAO DMVll LINE UNP DIAGi 
PROGRAM DOCUMENT 
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SEQ 0020 



976 

9 .* ■' 

9 78 

979 

980 

981 

982 

^83 

984 

985 

986 

987 

988 

989 

^90 

991 

992 

9^3 

994 

995 

996 

997 

998 

999 

1000 

1001 

1002 

100 5 

1004 

1005 

1006 

1007 

1C08 

1009 

1010 

1011 

1012 

1013 

1014 

1015 

1016 

1017 

1018 

1019 

1020 

1021 

1022 

1023 

1024 

1025 

1026 

1027 

1028 

1029 

1030 

1031 

1032 



♦ BE LOADED INTO TXSO AND TSOM 15 AGAIN SFT -- DRIVING TXBE LOW.) 

♦ AFTER THF RECEIVER IS SYNCHRONIZED (TWO SYNC CHARACTERS), TxDB IS 

♦ LOADED WHH A 125 AND. WITH TSOM STILL - 1 (SYNC SOURCE - TXDB), THE 

♦ USYRT I AGAIN CLOCKED. 

♦ AT THli. POINT, IF THE IDLE BIT WORKED. THE VALUE 125 WILL BE READ 

♦ BY THE RECEIVER. OTHERWISE A 226 WILL BE READ, INDICATING TXDB WASN'T 

♦ PROVIDING THE SYNC CHARACTERS. 

♦ WHEN TXBE GOES HIGH AGAIN. THE USYRT IS RESET. 

♦ ALL REGISTERS ARE AGAIN READ AND CHECKED. 

THIS TEST WILL GO NO FURTHER INTO THE TRANSMIT SEQUENCE SO THAT ONLY 

♦ ONE MARK ANO THREE SYNCS (226,226,125 FROM TXDB) ARE TRANSMITTED. 

♦ ERROR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN THE 

♦ SEQUENCE. 

************************* t**************************************************, 

***++*♦****+♦********♦#»*******♦********♦♦*•*************** ****************** 

* 
* 



TEST 16 <BCP TX UNDERRUN W/TSOM TERMINATION 



THE USYRT 
CONTROLLED 
HAVE BEEN 
USYRT, NO 
CONDITION. 
EXPECTED 



IS INITIALIZED FOR BCP WITH IDLE • 1 ANO TXC IS MANUALLY 
UNTIL TWO SYNC CHARACTERS AND ONE DATA CHARACTER (OOO) 
TRANSMITTED. AT THIS TIME WHEN TXBE IS ASSERTED BY THE 
DATA IS LOADED INTO TXDB -- FORCING AN UNOER RUN 
TXU ANO TERR ARE CHECKED BOTH BEFORE ANO AFTER THEIR 
ASSERTIONS. AFTER THE FIRST NON-DATA CHARACTER (WHICH 



SHOULD BE THE MARK CHARACTER) HAS BEEN STARTED, IDLE IS SET TO 0. 
THIS SHOULD FORCE THE NEXT NON-DATA CHARACTER TO BE A SYNC CHARACTER 
FROM S/AR. WHILE THIS SYNC CHARACTER IS BEING TRANSMITTED, TSOM IS 
ASSERTED (CLEARING TXU ANO TERR) -- IDLE IS LEFT AT 0. TXBE IS THEN 
CYCLED THROUGH AT LEAST ONE MORE SYNC CHARACTER ANO THE TEST IS 
ABORTED. ERROR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS 
WITHIN THE SEQUENCE. 

NOTE; BITS SHIFT OUT OF TX LSB FIRST. 



♦A*************************************************************************** 



J* 
i* 
J* 
{* 
i* 
J* 
I* 
;* 
i* 
;• 
i* 
i* 
}♦ 
j* 
,*** 



TEST 17 <BCP TX UNOERRUN W/RESET TERMINATION 

THE USYRT IS INITIALIZED FOR BCP WITH IDLE - 1 ANO TXC IS MANUALLY 
CONTROLLED WTIL TWO SYNC CHARACTERS ANO ONE DATA CHARACTER HAVE 
BEEN TRANSMITTED. AT THIS TIME WHEN TXBE IS ASSERTED BY THE USYRT. 
NO DATA IS LOADED INTO TXDB -- FORCING AN UNOER RUN CONDITION. TXU 
ANO TERR ARE CHECKED BOTH BEFORE ANO AFTER THEIR EXPECTED 
ASSERTIONS. AFTER THE FIRST NON-DATA CHARACTER (WHICH SHOULD BE THE 
MARK CHARACTER) HAS BEEN STARTED, IDLE IS SET TO 0, THIS SHOULD 
FORCE THE NEXT NON-DATA CHARACTER TO BE A SYNC CHARACTER. 
IMMEDIATELY AFTER THIS SYNC CHARACTER HAS BEING TRANSMITTED. A 
PROGRAM RESET IS ISSUED ANO ALL REGISTERS ARE CHECKED. ERROR 
LOOPING WILL DEPENO ON WHERE THE. FIRST ERROR OCCURS WITHIN THE 
SEQUENCE. 



J»**********¥*4**************************+**+************±******4±4*++** ++t+ * 4 

i* TEST 18 <BCP TX DISABLE. TEST^ 



CNDMCAO flMVU i INK UNH DIAG1 
PROGRAM DOCUMENT 

103? 

10?4 
1055 
1036 
103 7 
1036 
10 59 
1040 
1041 
1042 
1045 
1044 
104b 
1046 

104; 

1046 
1049 
1050 
1031 
105? 
1053 
1054 
1055 
1056 
1057 
1058 
1059 
1060 
1061 
1062 
1063 
1064 
1065 
1066 
1067 
1068 
1069 
1070 
1071 
1072 
1073 
1074 
1075 
1076 
1077 
1078 
!^79 
1080 
1081 
1082 
1083 
1084 
1085 
1086 
.087 
108© 
1089 
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* THE US^RT IS INITIALIZED FOR BCP AND A MESSAGE IS STARTED. ONCE THE 

* SECOND DATA CHARACTER IS LOADED INTO TXDB TXE IS DROPPED. TXSO IS 

* WATCHED TO ASSURE THAT THE CHARACTER BEING TRANSMITTED IS COMPLETED. 

* WHEN IT IS. THE USYRT SHOULD DROP TXA AND STOP TRANSMITTING -- THE 

* LAST CHARACTER LOADED INTO TXDB SHOULD BE LOST. 
♦ 

* CHARACTERS LOADED: 125 252 

* CHARACTERS TRANSMITTED: 125 

a*******************************************************************^^^^,, 

* TEST 19 <FIFO STACKING CHARACTERS TEST> 

♦ 

* THE USYRT IS SETUP FOR BCP MODE WITH NO ERROR DETECTION. 

* THIS TEST BEGINS BY SYNCHRONIZING THE RECEIVER AND THEN PROCEEDS 

* TO FILL THE 8 CHARACTER RECEIVER FIFO WITH THE CHARACTERS: 

* l/2( SYNCH) , 000, 377 ,125,252. 347, 030, 303, 1/2(074). 

* THESE CHARACTERS ARE THEN READ OFF OF THE FIFO AND CHECKED. NOTE 

* THAT NO CLOCKS ARE PROVIDED WHEN RECEIVING THE CHARACTERS SINCE THEY 

* ARE SUPPLIED BY THE FIFO SUPPORT LOGIC IN GROUPS OF 4 TICKS CWHEN 

* RDA • 0). 

* ALSO NOTE THAT DUE TO FIFO TIMING, TWO 'HALF CHARACTERS' ARE LOADED 

* INTO THE FIFO (THE 1ST ANO LAST CHARACTERS). 

* 
************************************>*******************************4,******** 

; ******** ******************************** ********************** ******* A******* 



5EQ 0021 



TEST 20 <BCP CHARACTER LENGTH TEST> 

THE USYRT IS INITIALIZED FOR BCP WITH NO ERROR CHECKING. TXC IS MANUALLY 
CONTROLLED INTIL TWO SYNC CHARACTERS HAVE BEEN TRANSMITTED. THEN 3 
Sl^TESTS FOLLOW. EACH ONE USING A DIFFERENT TRANSMIT CHARACTER LENGTH 
STARTING AT FIVE (5) ANO ENOING WITH SEVEN C7). 

TEST PATTERN: 111 222 333 044 155 266 377 



5* 

;* 
;* 
;* 
;* 
;* 
{* 

}♦ 

j *********************************************************** ♦♦♦♦******♦♦**♦**» 

;****** **************************************************** t****************** 

!♦ 

;* 
i* 
J* 
j* 
;* 
J* 
;* 
j * 
i* 
j* 
i* 



TEST 21 <BOP TX TABORT/CIDLE - 0) TEST> 

THE USYRT IS INITIALIZED FOR "BIT-ORIENTED PROTOCOL" (BOP) WITH IDLE 
SET TO ZERO. TXE AND TSOM IS ASSERTED AND TXC IS MANUALLY STEPPED WHILE 
OBSERVING TXA -- IT SHOULD BE ASSERTED WITHIN TWO (2) CLOCK CYCLES. 
NEXT, TXBE SHOULD GO HIGHi AT T HIS TIME AN ALL ZEROS CHARACTER WILL BE 
LOADED INTO TXDB DRIVING TXBE LOW. THE TRANSMITTER IS CLOCKEO THROUGH 
ONE CHARACTER. WHEN TXBE GOES HIGH AGAIN. TABORT IS ASSERTED CAUSING 
ABORT TO BE TRANSMITTED. ALL CHARACTERS ARE CHECKED AT TXSO. 
THIS TEST WILL GO NO FURTHER INTO THE TRANSMIT SEQUENCE SO THAT ONLY TWO 
FLAGS. ONE ZERO CHARACTER, ANO ONE ABORT CHARACTER IS SENT (INTO THE BIT 
BUCKET) ERROR LOOPING WILL DEPENO ON WHERE THE FIRST ERROR OCCURS UITMIN 
THE SEQUENCE. 

j*********** ********** *************************************** *************.<*** 



CNDMCAO DMV11 LINE UNIT DIAG1 
PROGRAM DOCUMENT 

1090 
1091 

1092 
1093 
1094 
109S 
1096 
1097 
1098 
1099 
1100 
1101 

110c? 

1103 
1104 

1105 

1106 
1107 
1108 
ii09 
1110 
1111 
1112 
1113 
1114 
1115 
1116 
1117 
1118 
1119 
1120 
1121 
1122 
1123 
1124 
1125 
1126 
1127 
1128 
1129 
1130 
1131 
113? 
1133 
1134 
1135 
1136 
1137 
1138 
1139 
1140 
1141 
1142 
1143 
1144 
1145 
1146 
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SEQ 0022 



♦ * + * + ******************#*»*****»#*,*«**»**»*»*#*********************4**m*i4 

* tpqt d? rono TV TAnnoT/rTnic . n tcct^ 



TEST 22 <BOP TX TABORT/(IDLF 



1) TEST> 



THE USYRT IS INITIALIZED TOR "BIT -ORIENTED PROTOCOL'' (BOP) WITH IDLE 
SET TO ONE. TXE ANO TCOM IS ASSERTED AND TXC IS MANUALL* STEPPED WHILE 

* OBSERVING TXA -- IT SHOULD BE ASSFRTED WITHIN TWO (2) CLOCK CtCLES. 

* NEXT, TXBE SHOULD GO HlGHj AT THIS TIME AN ALL ZEROS CHARACTER WILL BE 

* LOADED INTO TXDB DRIVING TXBE LOW. THE TRANSMITTER IS CLOCKED THROUGH 

* ONE CHARACTER. WHEN TXBE GOES HIGH AGAIN, TABORT IS ASSERTED CAUSING 

* ABORT TO BE TRANSMITTED. ALL CHARACTERS ARE CHECKED AT TXSO. 

* THIS TEST WILL GO NO FURTHER INTO THE TRANSMIT SEQUENCE SO THAT ONLY TuO 

* FLAGS, ONE ZERO CHARACTER. ANO ONE FLAG CHARACTER IS SENT (INTO THE BIT 

* BUCKET). ERROR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN 

* THE SEQUENCE. 

*********************************************************** **«+«tt*+*«4*«tt+* 



* 
J* 
I* 
: * 



TEST 23 <BOP TX TXGA (TRANSMIT GO-AHEAD) TEST> 

THE USYRT IS INITIALIZED FOR BOP ANO 1 Xfc IS ASSERTED. TSOH IS ASSERTED 
ANO TXA OBSERVED - IT SHOULD BE ASSERTEO WITHIN TWO (2) CLOCK CYCLES. 
NEXT. TXBE SHOULD GO HlGHj AT THIS TIME AN ALL ZEROS CHARACTER WILL BE 
LOADED INTO TXD6 DRIVING TXBE LOW. WHEN TXBE GOES HIGH AGAIN, TXGA 
IS ASSERTEO CAUSING GA TO BE TRANSMITTED. THE SEQUENCE OF EVENTS IS 
CONTINUALLY MONITOREO WHILE TXC IS MANUALLY CONTROLLED AND ALL 
CHARACTERS ARE CHECKED AT TXSO. THIS TEST WILL GO NO FURTHER INTO 
THE TRANSMIT SEQUENCE SO THAT ONLY 
AND ONE GA CHARACTER IS SENT (INTO THE 
ERROR LOOPING WILL DEPEND ON WHERE THE 
THE SEQUENCE. 



TWO FLAGS, ONE ZERO CHARACTER 

BIT BUCKET). 

FIRST ERROR OCCURS WITHIN 



!♦ 

i * 
J* 
i* 
i* 
}* 
»* 

; * 

J* 



TEST 24 <BOP TX MESSAGE WITHOUT CRC> 

THE USYRT IS INITIALIZED FOR BOP MODE WITH NO ERROR DETECTION. TXC IS THEN 
MANUALLY CONTROLLED UNTIL TWO FLAG CHARACTERS HAVE BEEN TRANSMITTED. THEN 
A 5 CHARACTER MESSAGE IS TRANSMITTED, RECEIVED, C'-CCKED, AND TERMINATED 
(WITH TEOM). A CHECK IS MAOE TO ASCERTAIN THAT NO CRC OR VRC IS GENERATED 
-- FLAG CHARACTERS SHOULD FOLLOW THE DATA. 

(NOTE: NO BIT STUFFING OCCUKS IN THIS TEST) 

TEST MESSAGE : FLAG FLAG 000 307 125 252 P^l FLAG 

**************************************i ***************** ******************** 



TEST 25 <BOP RX CHARACTER LENGTH TEST* 

THE USYRT IS INITIALIZED FOR BOP WITH CRC CCITT PRESET TO l'S. TXC 
IS MANUALLY CONTROLLED UNTIL TWO FLAG CHARACTERS HAVE BEEN 
TRANSMITTED. THEN 6 SUBTESTS FOLLOW, EACH ONE USING A DIFFERENT 
TRANSMIT CHARACTER LENGTH STARTING AT TWO (2) ANO ENOING WITH SEVEN 
( 7 ). IN EACH SUBTEST, TWO 8 BIT CHARACTERS WILL BE TRANSMITTED 
BEFORE TXCL IS CHANGED TO THE CHARACTER LENGTH BEING TESTED. THIS 



K.-' 



CNDMCAO DMV11 I. INF. UN 11 DIAGL 

PROGRAM DOCUMENT 

1147 
1148 
1149 
1150 
1151 
1152 
1 TVS 

i :54 

1155 
115b 
1157 
1158 
1159 
1160 
1161 
1162 
1 163 
1164 
1165 
1166 
1167 
1168 
1169 
1170 
1171 
1172 
1173 
1174 
1175 
1176 
1177 
1176 
1179 
1180 
1181 
1182 
1183 
1184 
1185 
1186 
1187 
1188 
1189 
1190 
1191 
1192 
1193 
1194 
1195 
1196 
1197 
1198 
1199 
1200 
1201 
1202 
1203 
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SFQ 00^^ 



CORRESPONDS TO NORMAL USAGE WHERE EITHER: 

1 -- A MESSAGE OF CHARACTERS WHICH ARE LESS THEN 8 BITS IS 

SENT AS A STREAM OF 8 BIT CHARACTERS AND THE REMAINING 
BITS ARE SENT AS A CHARACTER OF LESS THEN 8 BITS OR 

2 -- A HEADER OF TWO 8 BIT CHARACTERS IS SENT FOLLOWED BY A 

DATA S r REAM OF DATA CHARACTERS UHICH MAY BE LESS THEN 8 
BITS IN LENGTH (I.E. 2, 3, 4, 5, 6, OR 7 BIT 
CHARACTERS). 

THE TEST PATTERN IS: 123 321 111 ?.C2 333 044 155 266 377 



♦ 
* 
* 
* 

* 

* 
* 
* 
* 

************************** ******* ************************************* * ****** 

J***************************************************************************** 

;* TEST 26 <TX "SPACING SEQUENCE "> 

;* 

;* THE TRANSMITTER IS INITIALIZED ANO THE "SPACING SEQUENCE" IS FORCED 

;* BY ASSERTING BOTH TSOM £ TEOM AT THE SAME TIME - CHECK THE BIT 

;* STREAM FOR ACCURACY (SPACES) AND COMPLETNESS (16 OF THEM), WHEN TXB^ 

;♦ GOES HIGH (• 1) A S*'LL MESSAGE IS SENT. 

*********** ***************************************************** ************ ** 



;* 
;* 
j* 
;* 

5* 

i* 
;* 
i* 

i + 
;* 
j* 
i* 
j* 



**************************************************************************** 
TEST 27 <FIFO OVERRUN INTEGRITY TEST* 

THIS TEST BEGINS BY SYNCHRONIZING THE RECEIVER ANO THEN PROCEEDS TO FILL 
THE 8 CHARACTER RECEIVER FIFO UNTIL RXOR WITH THE CHARACTERS: 

(SYNCH). 000, 377, 125.252,347,030.303,074, 125. 
THESE CHARACTERS ARE THEN READ OFF OF THE FIFO AND CHECKED. OF IMPORTANCE 
IS THE INTEGRITY OF THE LAST OVERRUN-CAUSING FIFO CHARACTER (IT SHOULD 
REMAIN INTACT). 

NOTE THAT NO CLOCKS ARE PROVIDED WHEN RECEIVING THE CHARACTERS SINCE THEY 
ARE SUPPLIED BY THE FIFO SUPPORT LOGIC IN GROUPS OF 4 TICKS (WHEN 
RDA • 0). 

************************ *.*************************»************************* 



**************************** *************************************** * ** ******* 



TEST 28 <BCP RX OVERRLM SET ANO CLEAR TEST* 
THE USYRT IS INITIALIZED AND THREE SUBTESTS ARE PERFORMED. 

1 -- AN OVERRUN CONDITION IS FORCED, RECEIVER STATUS REGISTER IS 

READ TWICE: ONCE TO VERIFY ROR BIT - 1, ANO AGAIN TO VERIFY 
THAT THE FIRST READ CLEARED ROR . 

2 -- AN OVERRIN CONDITION IS FORCED (BY THE SAME TECHNIQUE USED IN 

(2). THE USYRT IS RESET AND THE PROPER STATE OF ALL REGISTERS 
IS VERIFIED. 

3 -- AN OVERRUN CONDITION iS FORCED (AS ABOVE). RXE IS THEN DROPPED 

AND A DELAY IS PROVIDED TO ALLOW TIME FOR THE FIFO TO FLUSH 
(CAUSED BY RDA GOING LOW). RXE IS THEN RE-INITIALIZED AND ROR 



CNDMCAO DMV11 LINE UNIT DIAG1 
PROGRAM DOCUMENT 

1204 

1205 
1206 
1207 
1208 
1209 
1210 
Ull 
1212 
1213 
1214 
121b 
1216 
1217 
1218 
1219 
1220 
1221 
1222 
1223 
1224 
1225 
1226 
1227 
1228 
1229 
1230 
1231 
1232 
1233 
1234 
1235 
1236 
1237 
1238 
1239 
1240 
1241 
1242 
1243 
1244 
1245 
1246 
1247 
1248 
1249 
1250 
1251 
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SEQ 0024 



15 CHECKED - 0, THE RECEIVER IS THEN RE-SYNCHED AND THE TEST IS 

TERMINATED. 



f t************************************************.***********************,**** 



;** 

;* 
;♦ 
;* 
;* 
;* 
:* 
J* 
;* 

; + 

J** 



******************************************************** ******************* 

TEST 29 <BCP RX SYNC CHARACTER RECOGNITION 

THE FOLLOWING MESSAGE IS INITIATED WITHOUT ASSERTING RXE AND ONCE 
THE DATA IS BEING TRANSMITTED, RXE IS ASSERTED CIE: O: 

SYNC * SYNC DATA DATA DATA SYNC SYNC SYNC SYNC SYNC DATA DATA DATA 
SYNC SYNC DATA DATA DATA SYNC SYNC 

THE RECEIVER SHOULD IGNORE THE FIRST STRING OF DATA CHARACTERS, USE 
THE NEXT TWO SYNC CHARACTERS FOR SYNCRONIZATION, THEN PASS THE REST 
OF THE MESSAGE C7 SYNC AND 6 DAT* CHARACTERS) THROUGH RXD8 REGISTER. 

********************+***+*******+**********************************4*A±**4* 



************************************ ********************++*****************+* 

* TEST 30 <BCP RX STRIP-SYNC TEST> 

* 

* THE USYRT IS INITIALIZED WITH THE STRIP-SYNC CONTROL BIT ASSERTED. 

* THE FOLLOWING MESSAGE IS THEN INITIATED WITHOUT ASSERTING RXE AND 

♦ ONCE THE DATA IS BEING TRANSMITTED, RXE IS ASSERTED (IE: >): 

♦ SYNC * SYNC DATA DATA DATA SYNC SYNC SYNC SYNC SYNC DATA DATA DATA 

* SYNC SYNC DATA DATA DATA SYNC SYNC 

* 

♦ THE RECEIVER SHOULD IGNORE THE FIRST STRING OF DATA CHARACTERS. USE 

* THE NEXT TWO SYNC CHARACTERS FOR SYNCRONIZATION, IGNORE THE NEXT 

♦ THREE SYNC CHARACTERS, ANO PASS THE REST OF THE MESSAGE (4 SYNC AND 

♦ 6 DATA CHARACTERS) THROUGH RXDB REGISTER. 

;***«**** ******** ****************************************** ****** ************* 
;********************************************** ********************* + ***4,***** 

}* TEST 31 <BCP RX LOST RXE TEST> 

;♦ 

i+ THE USYRT IS INITIALIZED CCRC16, STRIPS, BCP MODE) AND A MESSAGE IS STARTED. 

;* WHILE IN THE MIDDLE OF TEXT, RXE IS DROPPED AND r HE REACTION OF THE 

j* RECEIVER IS MONITORED. 

;♦ 

I **************************************************** *** ** * *** **************** 
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PROGRAM DOCUMENT 

1253 
1254 
1255 
1256 
1257 
1258 
1259 
1260 
1261 
1262 
1263 
1264 
1265 
1266 
1267 
1268 
1269 
1270 
1271 
1272 
1273 
1274 
1275 
1276 
1277 
1278 
1279 
1280 
1281 
1282 
1283 
1284 
1285 
1286 
1287 
1288 
1289 
1290 
1291 
1292 
1293 
1294 



SEQ 0025 



8.0 ERROR INFORMATION 



8,1 ERROR REPORTING 

ERRORS ARE REPORTED BY THE PROGRAM AS THEY OCCUR (IF NOT 
INHIBITED), THE REPORT CONFORMS TO THE DIAGNOSTIC SUPERVISOR 
ERROR REPORT FORMAT, AND CONSISTS OF A DESCRIPTION OF THE 
ERROR, THE TEST NUMBER, SUBTEST NUMBER, PC OK THE ERROR 
CALL, DEVICE ADDRESS, AND BASIC AND EXTENDED ERROR 
INFORMATION, 

THE FOLLOWING EXAMPLE PROVIDES A TYPICAL ERROR REPORT, WHICH 
DESCRIBES A "MASTER CLEAR FAILURE" ERROR, AND PROVIDES THE PC 
OF THE ERROR CALL AND THE DEVICE REGISTER CONTENTS : 

CNOMB DVC FTL ERR 00001 ON UNIT 00 TST 002 SUB 000 PCs 021122 
MASTER CLEAR FAILURE 

THE CONTENTS OF ALL BYTE SELECT REG'S ARE: 
BSELO BSEL1 BSEL2 BSEL3 
000 000 000 000 

BSEL4 BSEL5 BSEL6 BSEL7 
000 000 121 000 
BSEL10 BSEL11 BSEL12 3SEL13 
000 000 000 000 

BSEL14 BSEL15 BSLL16 BSEL17 
000 000 000 000 



FOR OTHER ERRORS, THE REPORT MAY BE MORE 
REQUIRE ADDITIONAL DATA TO BE REPORTED. 



EXTENSIVE, AND 



IF EXTENDED ERROR INFORMATION HAD BEEN INHIBITED USING THE 
IXfc FLAG PRIOR TO RUNNING THE TEST, THE ABOVE ERROR WOULD 
HAVE BEEN REPORTED IN THE FOLLOWING SHORTENED FORM : 

CNDMB DVC FTL ERR 00001 ON UNIT 00 TST 002 SUB 000 PC; 021122 
MASTER CLEAR FAILURE 



N u; 
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SEQ 0026 



1296 

120 ; 

1298 
1299 
1300 
1301 
1302 
1*03 
1309 
1310 
1311 
1312 
1313 
1314 
1315 
1316 
1317 
1318 
1319 
1320 
1321 
1322 
1323 
1324 
1325 
1326 
1327 
1328 
1329 



.SBTTL GENERAL EQUATES AND DS INVOCATION 6 SETUP 



000000 



002000 



HELP*0 



. »,?000 



002000 



002000 



000001 
000001 
000001 
000001 
000001 
000001 
000001 



*LSTIN» 1 
SLSTTAG- 1 

SVCINS- 1 

SVCTST- 1 

SVCS'B* 1 

SVCGBL- 1 

SVCTAG- 1 



CONTROL LISTING OF HELP INFORMATION 

HEl.P-0 NO LIST 
HELP-1 LIST 



.MCALL SVC 

SVC j INITIALIZE SUPERVISOR MACROS 



BGNMOD LU1M0D 



LIST INSTRUCTIONS, SHIFTED RIGHT 

LIST TEST TAGS, SHIFTED RIGHT 

LIST SUBTEST TAGS, SHIFTED RIGHT 

LIST GLOBAL TAGS, SHIFTED RIGHT 

LIST OTHER TAGS, SHIFTED RIGHT 



CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YOU WISH 
TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS. CHANGE THE 
SYMBOLS TO BE MINUS-ONE TO NOT LIST THE EXPANSIONS. YOU MAY 
CHANGE THE. SYMBOLS AT ANY POINT IN YOUR PROGRAM. 



CNDMCAO DMVll LINE UNU DIAGL 
PROGRAM HEADER 



1331 
1332 

1333 
1334 
1335 
133b 
133 7 
1538 
1346 
1347 



002000 



002000 
002000 
002000 
002001 
002002 
002003 
002004 
002005 
002006 
002007 
002010 
002010 
002011 
002011 
002012 
002012 
002014 
002014 
002016 
002016 
002020 
002020 
002022 
002022 
002024 
002024 
002026 
002026 
002030 
002030 
002032 
002032 
002034 
002034 
002036 
002036 
002O40 
002040 
002042 
002042 
002044 
002044 
002046 
002046 
002050 
002050 
002051 
002052 



103 
116 
104 
135 
103 
000 
000 
000 

101 

060 

000000 

000012 

036674 

000000 

002224 

000000 

037462 

000000 

000000 

000000 

000000 

002124 

000000 

oooooo 

000000 

003 
003 
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<;bttl program header 

» » 

THE PROGRAM HEADER IS THE INTEREACf RFTWtEN 
THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 



POINTER BGNAU.RGNDU.EMHTRL 



HEADER CNDMC,A,0,10.,0 



SEQ 002/ 



LINAHE: 


• 






'.Ascn 


/C/ 




.ASCII 


/N/ 




.ASCII 


/D/ 




.ASCII 


/M/ 




.ASCII 


/c/ 




.BTTE 







.BrTE 







.BVTE 





L*REV: : 








.ASCII 


/A/ 


LfDEPO: 








.ASCII 


/o/ 


L*'JNIT; 








'.WORD 





L1TIML: 








'.WORD 


10. 


LIHPCP: 








' .WORD 


LIHARD 


LtSPCP: 








.WORD 





LIHPTP: 








'.WORD 


l*HW 


LISPTPj 








'.WORD 





LILACP: 








' .WORD 


LILAST 


LISTA: : 








.WORD 





L*C0: : 








.WORD 





LIDTYP; 


j 






.WORD 





L«APT:: 








.WORD 





I IDTP: : 








.WORD 


LJDISPATCH 


I.IPRIO: 








' .WORD 





I.IENVI: 








* .WORD 





I iEXPl: 








* .WORD 





L.fMREV: 








' .B>TC 


cire:visxon 




♦ BYTE. 


CREDIT 



UfttPj; 



CNOMCAO DMVU t INf, UNU OTAGl 
PROGRAM HEADER 
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00205? 


000000 


002054 


000000 


002056 




002056 


000000 


002060 




002060 


003306 


002062 




002062 


000000 


002064 




002064 


000000 


002066 




002066 


000000 


002070 




002070 


021602 


002072 




002072 


021576 


002074 




002074 


oooooo 


002076 




002076 


003326 


002100 




00211)0 


104035 


002102 




002102 


002246 


002104 




002104 


021100 


002106 




002106 


021574 


002110 




002110 


021450 


002112 




002112 


021072 


002114 




002114 


OOOOOO 


002116 




002116 


OOOOOO 


002120 




002120 


OOOOOO 


1348 




13S4 




1355 











SFQ 0028 




.WORD 









.WORD 







l.tSPC: 










.WORD 







LIDEVP 










.WORD 


LIDVTYP 




LiRFPP 










.WORD 







LIEXP4 










.WORD 







LIF.XP5 










.WORD 







LiAUT; 










.WOHD 


ltf\v 




LIDUT: 










.WORD 


L*DU 




LJLlNi 










.WORD 







l *dfsp 


: 








.WORD 


LiDESC 




L.ll.OAU 


: 








EMT 


EILOAD 




LitTP; 










.WORD 


LfERRTBL 




L*ICP:< 










.WORD 


LIINIT 




L*CCP: 










.WORD 


L$CLEAN 




LIACP: 










.WORD 


LIAUTP 




l-IPRT; 










.WORD 


LJPROT 




l.iTEST- 


; 








.WORD 







LIOLY: 










.WORD 







L*HIM£, 


* 
• 








*WQRD 








.EVfcN 



CNOMCAO DMVll LINE UNI 1 D1AG1 
DISPATCH TABLE 

135; 

1358 

1359 002122 

1360 
1361 
1362 002122 

1563 

1364 002122 

002122 000037 
002124 

002124 021604 

002126 021764 

002130 022764 

002132 023150 

0O2134 023234 

002136 023460 

002140 023552 

002142 023644 

002144 023736 

002146 024066 

002150 024160 

002152 024234 

002154 024310 

002156 024632 

002160 024764 

002162 025146 

002164 025654 

002166 026254 

002170 026462 

002172 026740 

002174 027450 

002176 027644 

002200 030040 

002202 030234 

002204 030612 

002206 033534 

002210 034112 

002212 034476 

002214 035100 

002216 035556 

002220 036312 

1365 
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.SBTTl. DISPATCH TABLE 

SLASH 

; j ///////////////////////// ////////////////////////////////////// 
;/ THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OK F-ACH TEST. 
;/ 1 T IS USED BY THE SUPERVISOR TO DISPATCH TO IACh TEST. 
SLASH 



DISPATCH 31. 



.WORD 31 
LtQXSPATCH:: 

.UORD Tl 

.WORD T2 

.WORD T3 

.WORD T4 

.WORD T5 

.WORD T6 

.WORD T7 

. WOHO T8 

.WORD T9 

.WORD T10 

.WORD Til 

.WORD T12 

.WORD T13 

.WOftO T14 

-.WORD T15 

— — "WORD T16 

.WORD T17 

— •■■ — . WORD T 1 8 

— -—-—- WORD T 1 9 

.WORD T20 

~" " ^.WORO T21 

"'. WORD T22 
=:-=\"~-: : v^.WORD T23 
_ .WORD T24 

.WORD T25 

-„-:—--—- .~ WORD T 26 

s^™=™^UORD T27 

-~ ^.WORO T28 

.WORD T?9 

— , WORD T 30 

-- — — -^WORD T31 



SEQ 00^9 



CNDMCAO OMVtl LINE UNIT DIAG1 
DEFAULT HARDWARE: P TABLE 



1373 
13^4 
1375 
1376 
13?? 
1378 
13^9 
1580 
1381 



MACRO M1?00 
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SEQ 00* J 



.SBTTL DEFAULT HARDWARE P- TABLE 

j ///////////////////////////////////////////////// /////////////////////////// 
}/ THE DEFAULT HAROWARE P-TABLE CONTAINS DEFALK T VALUES OF 

/ THE TEST -DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 

/ IS IDENTICAL TO THE STRUCTURE OF THE RUN- TIME P- TABLE. 

/////////////////////////////////////////////////////////////////////////// 



1382 
1383 
1384 
1385 
1386 
1387 
1388 
1389 
1390 
1391 
1392 
1393 
1394 



002222 
002222 
002c 24 
002224 

002224 
002226 
002230 
002232 
002234 
002236 
002240 
002242 



002244 

002244 



000010 



160020 
0O0300 
0O40O0 
OOCOOO 
000000 
000000 
000000 
000001 



BGNHW DFPTBL 



.WORD L 10000 -L*HW/2 



.WORD 


160020 


.WORD 


300 


.WORD 


4000 


.WORD 


000 


.WORD 


000 


.WORD 





.WORD 





.WORD 


I 



ENDHW 



LIHW: : 
DFPTBL: 

jOMVU CSR UNIBUS ADDRESS 

lOMVU INTERRUPT VECTOR 

jDMVll INTERRUPT PRIORITY LEVEL 

j SWITCH REG. 01 (BOOT ADDRESS) 

i SWITCH REG, 02 (DDCMP ADORESS) 

j MODULE IS M8064 

jH3254£H3255 USED 

jBAUO RATE - 56 K 

; - 19.2 K 

t 1 • 56 K 



L 10000: 



CNDMCAO DMVU LINE UNI 1 DIAG1 

SOFTWARE P- TABLE 

13^6 
139/ 
1398 
1399 
1400 
1401 
1402 
1403 002244 

002244 000000 

002246 

002246 
1404 
1405 002246 

002246 
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,SBTTL SOFTWARE P- TABLE 



SEQ 0031 



;/ THE SOFTWARE P- TABLE CONTAINS THE VALUES OF THE PROGRAM 

;/ PARAMETERS THAT CAN BE CHANGED BY THE OPERATOR. 

i ////////// //////////////////f/ //////////////// ////////// /////////////// 



BGNSW SFPTBL 



ENOSW 



L$SW: : 

SFPTBL t : 



LlOOOli 



.WORD L 10001 -L*SW/2 



1 ) 
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2c? -FEB -84 153:31 PAGE 14 



140? 
1408 
1409 
1410 
1411 
1412 
1413 
1414 
1415 002246 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 

001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 



000040 
000037 
000036 

000035 
000034 



aEQ 0032 



.SBTTl. GLOBAL EQUATES SECTION 



BASIC EQUATES 



///////////////////////////////////////////////////////////////////////////// 
/ THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
/ ARE USED IN MORE THAN ONE TEST. 
///////////////////////////////////////////////////////////////////////////// 

EQUALS 

BIT DIFINITIONS 



BIT15-' 


■ 100000 


BIT14-- 


• 40000 


BIT13-- 


' 20000 


BIT12-- 


. 10000 


BIT11-- 


• 4000 


BIT10-- 


• 2000 


BIT09-* 


■ 1000 


BIT08- 


■ 400 


BIT07-- 


200 


BIT06-- 


' 100 


BIT05-" 


» 40 


BIT04-- 


• 20 


BIT03-« 


" 10 


BIT02-' 


» 4 


BIT01-« 


• 2 


BIT00-« 


■ 1 


BIT9-- 


BIT09 


BIT8-- 


BITOd 


BIT7-- 


BIT07 


BIT6-- 


BIT06 


BIT5-- 


BIT05 


BIT4-- 


BIT04 


BIT3-- 


BIT03 


BIT2-- 


BIT02 


BIT1-- 


BIT01 


BITO-- 


BITOO 



j EVENT FLAG DEFINITIONS 
i EF32:EF17 RESERVED FOR 

i 

EF. START-- 32. 

EF. RESTART-- 31. 

EF. CONTINUE-- 30. 

EF.NEW-- 29. 

EF.PWR-- 28, 



SUPERVISOR TO PROGRAM COMMUNICATION 

i BIT POSITION IN SECOND STATUS UORD 

j (100000) START COMMAND WAS ISSUED 

i (040000) RESTART COMMAND WAS ISSUED 

i (020000) CONTIN^ COMMAND WAS ISSUED 

j (010000) A NEU PASS HAS BEEN STARTED 

: (004000) A POWER -FAIL/POWER -UP UCCURRuD 



000340 
000300 
000?4C 
000200 



PRIORITY LEVEL DEFINITIONS 



PRI07 
PRI06 
PRI05< 
PR 104 > 



340 
300 
240 
200 



M ' 
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GLOBAL EQUATES SECTION -- OASIC EQUATES 

000140 

000100 
000040 
000000 



000004 
00O010 
000020 
000040 
000100 
000200 
000400 
001000 
002000 
004000 
01OO00 
020000 
040000 
100000 



SEQ 0033 



PRI03-- 


140 


PRI02-- 


100 


PRI01-- 


40 


PRIOO-* 





| OPERATOR FLAG 


EVL-- 


4 


LOT-» 


10 


ADR-- 


?0 


IOU-- 


40 


ISR- = 


100 


UAM-» 


200 


B0E»« 


400 


PNT-- 


1000 


PRI-- 


2000 


IXE-- 


4000 


IBE»- 


10000 


IER»« 


20000 


LOE-- 


40000 


HOE-* 


100000 
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REGISTER DEFINITIONS -■ MAINTENANCE REGISTERS -- SEEN C BSELN 



SEQ 0054 



14 1? 




1418 




1419 




1420 




1421 




1422 


000020 


1423 


000001 


14 24 




1425 




1426 




142? 




1428 




1429 




1430 




1431 




1432 




1433 


000 2 00 


1434 


000100 


1435 


000001 


1436 


000301 


1437 




1438 




1439 




1440 




1441 


000200 


1442 




1443 




1444 




1445 




1446 


000001 


1447 


000002 


1448 


000003 


1449 


000004 


1450 


000005 


1451 


000007 


1452 




1453 





.SBTTL REGISTER DEFINITIONS -- MAINTENANCE REGISTERS 



SEEN € BSFI.N 



* MAINTENANCE REGISTER * - BSELO 

IEO - BIT4 T'lNTERRUPT ENABLE OUT" 

IEI • BITO t "INTERRUPT ENABLE IN" 

BIT 7 IS ALSO USED BY THE MICROCODE, ITS LABEL IS "RQI" UHICH STANOS FOR 
"REQUIST IN". IT'S PART OF THE HANDSHAKING FOR USING THE SEL 6 BSFL REG'S. 
HOWEVER. THE MAINT. LOOP DOES NOT MAKE USE OF THIS BIT AND IT IS THERFFORF 
j UNNECESSARY TO DEFINE IT HERE, 

j* MAINTENANCE REGISTER * 1 - BSELl 

RIN - BIT7 ;"RUN" 6 ALSO CONTROLS 6502 MICROPROCESSOR'S RDY STATE 

MCLR • BIT6 .-MASTER CLEAR 

MREQ - BITO jM-LOOP ACCESS 

STRTMLOP- RUN.'MCLRJMREQ jINITIATE M-LOOP 

|* MAINTENANCE REGISTER * 2 BSEL2 

I ;* + **** + ** + + * + * + + + **** + * + **** + * + * + * t *** + ****** + +**** + **.*** + + * + + + + mmmm 

MRDY - BIT7 jM-LOOP READY 



J 



,♦ MAINTENANCE LOOP COMMAND DEFINITIONS 

;READ LOC. W/IN DMV-11 CSEL4) ••-> BSEL6 

iWRITE LOC. W/IN DMV-11 --- BSEl.6 ---> (SEL4) 

jREAD BLOCK W/IN DMV-11 --- CSEL6) •••> (SEL4) 

jWRITE BLOCK W/IN DMV-11 -- ( SEL4 ) •••> (SEL6) 

sSET 6502* S PC ANO EXECUTE -- SEL6 -■-> PC 

tSET MAINTENANCE INTERRUPT DISABLE IN PROCESSOR 
{STATUS --- (KB7] --> BSEL3 



REDLOC 


■ 


1 


WRILOC 


■ 


2 


REDPAG 


■ 


3 


WRIPAG 


■ 


4 


EXECUT 


a 


5 


00T8MT 


a 


7 



CNDMCrtO DNVU LINE UNIT DIAG1 
REGISTER DEFINITIONS USYRT 



1455 




145b 




1457 




1458 


120400 


1459 




1460 




1461 




1462 




1463 




1464 


120400 


1465 




1466 




1467 




1468 




1469 




14 70 


120401 


1471 




1472 




1473 


000200 


1474 


000160 


1475 


000010 


14 76 


000004 


1477 


000002 


1473 


000001 


1479 




1480 




1481 


100000 


1482 


004 OOO 


1483 


002000 


1484 


001000 


1485 


000400 


1486 




1487 


000001 


1488 




1489 




1490 




1491 




1492 




1493 


120402 


1494 




1495 




1496 




1497 




1498 




1499 


120403 


1500 




1501 




1502 


000200 


1503 


000010 


1504 


000004 


1505 


000002 


1506 


000001 


1507 




1508 




1509 


100000 


1510 


004000 


1511 


002000 
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.SBTTL REGISTER DEFINITIONS -- USYRT 



SEJ 005! 



USYRT - 120400 



;USYRT BASE ADDRESS ■ A100 (HEX) 



;;************************************+****************4*********A**±*A******* 

;* USYRT "RECEIVER DATA BUFFER" REGISTER -- READ ONLY 



RDSRL 



120400 



{ADDRESS OF THIS REG 



I;**************************************************************************** 

;* USYRT "RECEIVER STATUS" REGISTER -- READ ONLY 

• ;************************************************************************.:.*** 



RDSRH 



RERR 

ABC 

ROR 

RABGA 

REOM 

RSOM 



RXERR 

RXOR 

RXABGA 

RXEPM 

RXSOM 

RERCHK 



120401 



{ADDRESS OF THIS REG 



{BIT DEFINITIONS ON B>TE BASIS : 

» BIT7 {ERROR CHECK 

» B1T6!BJ.T5!BIT4 {ASSEMBLED BIT COUNT 

- BIT3 {RECEIVER OVER RUN 

• BIT2 {RECEIVED ABORT/GA CHARACTER 

- BIT1 {RECEIVED ENO- OF -MESSAGE 

■ 8110 {RECEIVED START -OF -MESSAGE 

{BIT DEFINITIONS ON UORD BASIS : 

- BIT15 {RECEIVED CRC/VRC ERROR 

- BIT11 {RECEIVER OVER RUN 

- BIT10 {RECEIVEO ABORT/GO AHEAD CHA, <CTER 

- BIT9 {RECEIVED END -OF -MESSAGE 

- BITS {RECEIVED START -OF -MESSAGE 



BITO 



{FLAG TO INVOKE RERR CHK IN SUBROUTINE RXCHAR 



j* USYRT "TRANSMITTER DATA BUFFER" REGISTER 

;j******** + *************+***************************************************,,»* 



TDSRL 



• 120402 



{ADDRESS OF THIS REG 



»t***************************************************** *********************** 
j* USYRT "TX STATUS ANO CONTROL" REGISTER 

; {*************************< ************************* ************************* 



TDSRH 



TERR 

TGA 

TAB 

TEOM 

TSOM 



TXERR 

TXGA 

TXAB 



120403 



{ADDRESS OF THIS REG 



{BIT DEFINITIONS ON BYTE BASIS : 

- BIT7 {TRANSMITTER UNOERRUN ERROR 
" 9IT3 {TRANSMIT GO AHEAD 

- BIT2 {TRANSMIT ABORT 

- BIT1 {TRANSMIT END -OF -MESSAGE 

- BITO {TRANSMIT START -OF -MESSAGE 

,BIT DEFINITIONS ON WORD BASIS : 

• BIT15 {TRANSMITTER UNOERRUN ERROR 
» BIT 11 {TRANSMIT GO AHEAD 

• BIT10 {TRANSMIT ABORT 



W -'. 
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151? 
1513 
1514 
1515 
1516 
1517 
1518 
1519 
1520 
1521 
1522 
1523 
1524 
1525 
1526 
1527 
1528 
1529 
1530 
1531 
1532 
1533 
1534 
1535 
1536 
1537 
1538 
1539 
1540 
1541 
1542 
1543 
1544 
1545 
1546 
1547 
1548 
1549 
1550 
1551 
1552 
1553 
1554 
1555 
1556 
1557 
1558 
1559 
1560 
1561 
1562 
1563 
1564 
1565 
1566 
1567 
1568 



001000 
000400 



120404 
000226 



120405 



000200 
000100 
000040 
000020 
000010 
000007 



100000 
040000 
020000 
010000 
004000 
001400 
003400 
002400 
002000 



120407 



000340 
000020 
000010 
000007 



122000 



SEQ 0036 



TXEOM 
TXSOM 



= BIT9 
- BITS 



j TRANSMIT END-OF -MESSAGE 
{TRANSMIT START -OF -MESSAGE 



j;**************************************************************************** 

;* USYRT "SYNC/SECONDARY ADDRESS" REGISTER 

;•*+*************«** *,*.* *************************************m** ************* 



PCSARL 
SYNCH 



120404 
226 



jADORESS OF THIS REG 
{STANDARD SYNCH CHARACTER 



;;**************+*«************************«********************. **+♦+♦**♦*»*♦ 

j* USfRT "MODE CONTROL" 

j-******.********************************************************************** 



PCSARH 



APA 

PROTO 

STRIP 

SECAD 

IDLE 

XYZ 



APAD 

DDCMP 

STRIPS 

SECADR 

IDLES 

CRC16 

NOCHK 

EVRC 

OVRC 



- 120405 {ADDRESS OF THIS REG 
{BIT DEFINITIONS Oi\ BYTE BASIS: 



- BIT/ 

- BIT6 

- BIT5 
» BIT4 
• BIT3 



j"ALL PARTIES ADDRESS" ENABLE 

{SPECIFIES BOfVCCP PROTOCOL -- - 30^ 

{STRIP EXTRA SYNC'S IN CCP MODE. SEE GA CHARS IN BOP 

{SECONDARY ADDRESS MOOE -- BOP MODE ONLY 

I IDLE 6 SYNC CHAR. TRANSMISSION CONTROL 



- BIT2!BIT1!BIT0 {CRC/PARITY SELECTION CONTROL 

{BIT DEFINITIONS OK WORD BASIS: 

BIT15 i "ALL PARTIES ADDRESS" ENABLE 

BIT14 ,COD£ FOR OOCMP MOOE 

BIT13 {STRIP EXTRA SYNC'S IN CCP MOOE. SEE GA CHARS IN BOP 

BIT12 {SECONDARY ADDPESS MOOE -- BOP MOOE ONLY 

BITU 1IO1.E 6 SYNC CHAR, TRANSMISSION CONTROL 

BIT9JBIT8 {CODE FOR CRC-16 SELECTION 

BIT10!BIT9!BIT8 {CODE FOR NO ERROR CHECKING 

BIT10IBIT8 iCOCC FOR VRC EVEN CHECK 

BIT10 {CODE FOR VRC ODD CHECK 



i i 



i* USYRT "DATA LE^TH SELECT" REGISTER 

jj****************************************************.*,****^****************** 



PCR 



TXDL 
EX ADD 
EXCON 
RXDL 



- 120407 {ADDRESS OF THIS REG 
{BIT DEFINITIONS: 

• BIT7!BIT6!BIT5 {TRANSMIT DATA LENGTH SELECTION 

- BIT4 {EXTENDED ADORESS FIELD - NOT USED OR TESTED 

- BIT3 {EXTENDED CONTROL FIELD -- NOT USEO OR TESTED 

• BIT2!BIT1'BIT0 {RECEIVER DATA LENGTH SELECTION 



; ; 



i* USYRT STATUS REGISTER CADDR. A400) 

, , ***************** ****************************** **************** A*. 

USTATR * 122000 jUSYRT STATUS REGISTER ADDRESS » A4QG (HEX) 



tBXT DEFINITIONS: 
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1569 


000200 


1570 


000100 


1571 


000040 


157? 


000020 


1573 


000010 


1574 


000004 


1575 


000002 


lr-76 


000001 



200 22 


■FtB-84 15 


RDA 


« BIT? 


TBMT 


* BIT6 


RXACT 


• BIT5 


RSA 


■- BIT4 


TSO 


- BIT3 


TXACT 


- BIT? 


TXU 


■ BIT1 


Sf-R 


- BITO 



I. y > 
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SEQ 0037 



jRECEIVER DATA AVAILABLE 
TRANSMITTER BUFFER EMPTY 
RECEIVER ACTIVE 
RECEIVER STATUS AVAILABLE 

i TRANSMITTER SERIML OUTPUT 

j TRANSMITTER ACTIVE 

; TRANSMITTER UNDF.RRUN 

{SYNC/FLAG RECEIVED 



M 5 



REGISTER DEFINITIONS 



CNDHCAO DMVll LINK UNIT DIAG1 MACRO M1200 22-FEB-84 I5s31 PAGE 17 

6522 VIA CHIP 

.SBTTL REGISTER DEFINITIONS — 6522 VIA CHIP 

VIA » 120000 {VIA BASE ADDRESS ■ AOOO CHEX) 

; -A********************************** ******************* ******** ************** 

;♦ MODEM f. MAINTENANCE CONTROL - "ORB" 8 BIT PORT B -- */RITE ONLY 

; ; ********************************** *********************** ********** ********* 



SEQ 0036 



1578 




1579 




1580 


120000 


1581 




1582 




1583 




1584 




1585 




1566 


120000 


1587 




1588 


000200 


1589 


000100 


1590 


000040 


1591 


000020 


1592 


000010 


1593 


000004 


1594 


O0COO2 


1595 


000001 


1596 


000000 


1597 




1598 




1599 




1600 




1601 




1602 


120001 


1603 




1604 


000200 


1605 


000100 


1606 


000040 


1607 


000020 


1608 


000010 


1609 


000004 


1610 


000002 


1611 


000001 


1612 




1613 




1614 




1615 




1616 




1617 




1616 


120002 


1619 




1620 




1621 




1622 




1623 




1624 




1625 




1626 




1627 




1628 




1629 




1630 


120003 


1631 




1632 




1633 




1634 





VIAORB 



120000 



.♦ADDRESS OF THIS REGISTER - - HEX = AOXO 

;"NULL CLK L" -- NULL CLOCK 
j'*RXENL" -- USYRT RECEIVER ENABLE 
{"TXENL" -- USYRT TRANSMITTER ENABLE 
{"DTR" -- DATA TERMINAL READY 
{"RTSND" -- REQUEST TO SEND 
j"HDX" -- HALF DUPLEX 
{"SELECT TTL LEVEL LOOPBACK" 
{"PRESET H" -- 
;DTR IS ASSERTED LOW 

• j **************************************************************************** 

;* MODEM STATUS REGISTER — "ORA" 8 BIT PORT A -- READ ONLY 

. ;********************************************** **************** ************** 



NULCLK 


■ 


BIT7 


RXEN 


a 


BIT6 


TXEN 


n 


BIT5 


DTR 


a 


BIT4 


RTSND 


■ 


BIT3 


HDX 


X 


BIT2 


TTLOOP 


3 


BIT1 


PRESET 


» 


BITO 


DTRL 


at 






VIAMS 



120001 



; ADDRESS OF THIS REGISTER - - HEX - A0X1 

{"RING H" -- 

{"CARRIER H" -- 
{"MODEM RDY H" -- 

"BAUD RATE SWITCH -- C19.2K/56IO 

"CTS H -- CLEAR TO SEND 

"TEST MODE H" -- 

"RCV DATA H" -- 
SELECT USYRT INT LOOPBACK **SELECT BIU* 



} j ***************************** ************ **************** ******************* 

;* DATA DIRECTION FOR PORT B -- "DDRB" -- READ/WRITE 

; { ******* ****************** *********** ****************************** ********** 



RING 


' BIT7 


CARIER « 


■ BIT6 


MOMRDY ■ 


■ BITS 


SPEED 


■ BIT4 


CTS 


• BIT3 


TM 


■ BIT2 


RCVOAT • 


■ BIT1 


UMAINT ■ 


■ BITO 



VIADPB - 120002 



.♦ADDRESS OF THIS REGISTER --HEX - A0X2 



} ALL BITS ARE DEFINED THE SAME: 

{ THE BIT SETTING DEFINED THE DIRECTION OF ITS RELATED BIT IN BIT PORT B 

} INITIALIZED TO 377 (HEX - FF) -- PORT B IS READ/WRITE 

; ; It*************************************************************************** 

{* DATA DIRECTION FOR PORT A -- "DDRA" -- READ/WRITE 

♦j******!********************************************************************* 



VIADPA - 120003 



{ADDRESS OF THIS REGISTER -~ HEX « A0X3 



; ALL BITS ARE DEFINED 1HE SAMEi 

; THE BIT SETTING DEFINED THE DIRECTION OF ITS RELATED BIT IN BIT PORT A 



Nf 
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SEQ 0039 



1635 
1636 

163 7 
1638 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 

164 7 
1648 
1649 
1650 
1651 
1652 
1653 
1654 
1655 
1656 
1657 
1653 
1659 
1660 
1661 
1662 
1663 
1664 
1665 
1666 
1667 
1668 
1669 
1670 
1671 
1672 
1673 
1674 
1675 
1676 
1677 
1678 
1679 
1680 
1681 
1682 
1683 
1684 
1685 
1686 
1687 

16&: 

1690 
1691 



120004 



120005 



120006 



120007 



INITIALIZED TO 001 (HEX * 01) — PORT A IS READ ONLY CEXCEPl FOR 

8IT0 WHICH ENABLES USYRT INTERNAL LOOPBADO 



; ********************<■. + + *************** + **************************** ********* 

* TIMER 1 LOW ORDER (LATCH 6 COUNTER) - - "T1L-L" £ "T1C-L" -- WRITE 6 READ 



VIAT1A 



120004 



{ADDRESS OF THIS REGISTER --HEX - A0X4 



WHEN WRITING, LOW ORDER LATCH IS LOADED. 
WHEN READING, LOW ORDER COUNTER IS READ. 



j ; ********************************************** 

;* TIMER 1 HIGH ORDER COUNTER 6 TRIGGER -- "T1L-H AND TRIGGER" £ "T1C-H" 
j* -- WRITE C READ 

;;***************************************** ***.********************* + ********* + 



VIAT1B 



120005 



; ADDRESS OF THIS REGISTER •- HEX - A0X5 



WHEN WRITINGj HIGH ORDER LATCH IS LOADED. BOTH LOW C HIGH ORDER LATCHES 
ARE LOADED INTO THE COUNTER, AND THE COUNTER IS STARTED. 

WHEN READING, THE HIGH ORDER COUNTER IS READ. 



;j**************************************************************************** 

;* TIMER J LOW ORDER LATCH -- "T1L-L" -- READ/WRITE 

j f ***** + ************* + ***+*************************************** + ************ 



VIATIC 



120006 



: ADDRESS OF THIS REGISTER 



HEX - A0X6 



THE LOW ORDER LATCH IS READ OR LOADED. THIS LATCH IS USED TO LOAD THE 
COUNTER WHEN TlMODE (IN VIAACR) * 3 



j | **************************************************************** *.**A******A* 

;* TIMER 1 HIGH ORDER LATCH -- "T1L-H" -- READ/WRITE 

; ; ********+****+*++*+*+**+***+************************************♦*********** 



VIAT1D 



120007 



t ADDRESS OF THIS REGISTER -HEX - A0X7 

THIS LATCH IS USED TO LOAD THE 



THE HIGH ORDER LATCH IS READ OR LOADED. 
COUNTER WHEN TlMODE (IN VIAACR) - 3 



j ***************** /********* i*/-*****************************. * fe„,« *rf. ,. tJ.********* 

;♦ TIMER 2 LOW ORDER (LATCH 6 COUNTER) -- "T2L-L" L "T2CL" -- U.u, f RfAD 

; ; ******»* + * + ******,*,*,*,*,** >1 *,^*tui a**.******* *************************** j. * » .****,*,*,*.*, 






120010 



VIAT2A * 120^10 



i ADDRESS OF THIS REGISTER --HEX * AOXd 



VI 



CNOMCAO DMV11 I. INF. UNIT 

REGISTER DEFINITIONS 

1692 
16*>5 

1694 
169? 
1696 
1697 
lb98 
i><»9 

1 '00 
1701 

170c? 

1703 120011 

1704 

1705 

1706 

1707 

1706 

1709 

1710 

1715 

171 > 

1715 

1714 120012 

1715 

1716 

1717 

1713 

1719 

1720 

1721 

1722 

1723 

1724 120013 

1725 

1726 000300 

1727 

1728 

1729 

1730 

1731 

1732 

1733 

1734 

1735 

1736 000040 

1737 

1738 

17 39 

1/40 

1741 OOOOM 

1742 

1743 

1 744 

1745 

1746 

1747 

1748 



DIAGl MACRO M1200 
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SEQ 0040 



; WHEN WAITING, LOW ORDER LATCH IS LOADED 
i WHEN READING, LOW ORDER COUNTER IS READ 



j* TIMER 2 HIGH ORDER COUNTER £ TRIGGER -- "T2L -H AND TRIGGER" £ ' T2C H" 
}♦ -- WRITE 6 READ 

VIAT2B - 120011 i ADDRESS Of THIS REGISTER -- HEX - A0X9 

j WHEN WRITING} HIGH ORDER LATCH IS LOADED. BOTH LOW 6 HIGH OROER LATCHES 
; ARE LOADED INTO THE COUNTER, AND THE COUNTER IS STARTED. 

} WHEN READING, THE HIGH ORDER COUNTER IS READ. 

II** **•**»*****•*«**«•*•*•****•«•****«, ********* A****************************** 

!♦ SHIFT REGISTER - "SR" ~ READ/WRITE 
ji***************+*******************«****««***t**»«««*«*«*tttt««**««t**«**«t4 

VIASR • 120012 tADORESS OF THIS REGISTER - HEX - AOXA 

j SHIFTING IS CONTROLLED BY THE SETTING OF VIASRC CACR2 ---> ACR4 ) IN VIAACR 

j J**************************************************************************** 

j* AUXILIARY CONTROL REGISTER - "ACR" -- READ/WRITF 
ll*****************************************************«*«*************»***** 4 

VIAACR • 120013 jADORESS OF THIS HEGISTER -- HEX - AOXB 

T1M00E - BIT7JBIT6 jCONTROL THE MODE OF TIMER • 1 

*BIT 7 S 

j PB7 DISABLED - ONLY TITO IN VIAIFR REFLECTS TIMEOUT 
I 1 PB7 £ TITO REFLECT TIMEOUT 

»BTT 6: 

i TIMER 1 IN ONE -SHOT MOOE 

I 1 TIMER 1 IN CONTINUOUS SQUARE WAVE MOOE 

T2M00E • BIT5 i CONTROLS THE MOOE OF TIMER * 1 

I PULSE COSTING MOOE 
j 1 INTERVAL TIMER MOOE 

SRMOQE » QIT4JBIT3JBIT2 iCONTROLS THE MOOE OF THE SHIFT REGISTER 

i SR DISABLED 

I 1 SHIFT IN UNDER CONTROL OF T2, SHF T PULSES GEN' D ON CB 1 

i 2 SHIFT IN AT SYS. CLOCK RATE, SHF T PULSES G£N'D ON CB1 

i 3 SHIFT IN UNDER CONTROL OF EXTERNAL INPUT PULSES 

I A SHIFT OUT • FREE RUNNING RATE CONTROLLED B> \? 

I 5 SHIFT OUT - - RATE CONTROLLED BTf T2 - • PULSES ON CBl 
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SEQ 0041 



1749 




1750 




1751 




17V 


000002 


1753 


000001 


1754 




1"55 




.' 756 




175/ 




i'5e 




1*<59 




1760 




1761 




1762 


130014 


1763 




!. 764 


000340 


1765 


OOC020 


1766 


000016 


1 76 7 


000001 


1768 




1769 




1770 




1771 




1772 




1773 




17 74 




1775 


120015 


1776 




1 7 7 7 


000200 


17/8 




1779 




1780 




1781 




1782 




1783 


000100 


1/84 


000040 


1785 


000020 


1786 


OOOOIO 


178/ 


000004 


1788 


0O0OO2 


1/89 


0O00O1 


1790 




1791 




1 79? 




1793 




1 794 




1795 




1/96 




1/9/ 


120016 


1/98 




1799 


000200 


1800 




1801 




1802 




1803 




1804 




1805 





I t* 



SHIFT OUT 
SHIFT OUT 



SrS. CLOCK RAH 

UNDER CONTROL OF 



PULSES APPI. 



CB1 

IF.D TO 



CB1 



PBLEN8 
PALENB 



Bin 

BITO 



jPB 
} PA 



LATCH 
LATCH 



CONTROL 
CONTROL 



ENABLES 

ENABLES 



I AKh 
LATCH 



t J 



{ * PERIPHERAL CONTROL REGISTER 



"PCR" 



READ/WRITE 



J 



VIAPCR 



120014 



l ADDRESS OF THIS REGISTER 



HEX - AOXC 



CB2CTL 


■ BIT7!BIT6!BIT3 


»CB2 


mooe 


SELECT 


CB1CTL 


- BIT4 


jCBl 


MOOE 


SELECT 


CA2CTL 


• BIT3|BIT2!BIT1 


|CA2 


MOOE 


SELECT 


CA1CTL 


■ BITO 


»CA1 


MODE 


SELECT 



i i 



i* INTERRUPT FLAG REGISTER 



IFR" 



READ ONLY 



J 



VIAIFR 
FLGIRQ 



120015 
BIT7 



jADDRESS OF THIS REGISTER 



HEX - AOXO 



FLGT1 


- BIT6 


FLGT2 


- BIT5 


FLGCB1 


» BIT4 


FLGCB2 


- BIT3 


FLGSR 


» BIT2 


FLGCA1 


- BIT1 


FLGCA2 


- BITO 



i SET WHEN A FLAG IN THIS REG. G06S HIGH AND 
I ITS CORRESPONDING BIT IN VIAIFR IS SET. 
i (I.E. VIAIER IS THE ENABLE REGISTER FOR THE. 
|F0« THE SETTING OF IRQ AND THE ISSUEANCE Of' 
I AN INTERRUPT TO THE 6502 WHEN IRQ IS SET.) 

I TIMEOUT OF TIMER 1 

*TIMEOUT OF TIMER 2 

iACTIVE TRANSITION OF PIN 18 tCBl) 

lACTIVE TRANSITION OF PIN 19 (C92) 

■COMPLETION OF 8 SHIFTS 

lACTIVE TRANSITION OF PIN 40 CCA1) 

lACTIVE TRANSITION OF PIN 39 CCA2) 



j i 



j* INTERRUPT ENABLE REGISTER 



"IER" 



READ/WRITE 



J i 



VIAIER • 120016 
IM5C ■ BIT/ 



^ADDRESS OF THIS REGISTER 



HEX 



AOXE 



iCONTROLS THE SETTING OR CLEARING OF BITS IN 
j THE REST Of IER. IF - THE OTHER BITS IN 
j THIS REG.. IF SET. WILL CLEAR THEIR RESPECTIVE 
iBITS IN THE INT. ENA$. REG.. IF » 1, TH£ 
jRESPECTIVE BITS Will B£ 5£T* 



WHtN WRITING THIS Htb.» THfc CUMMENT ABOVE HQIDS. 



LVI 



CNDMCAO DNVU t INE UNJ T 

REGISTER DEFINITIONS • 

180b 

180/ 

1808 

1809 

1810 

1811 

1812 

1*1? 

1814 

1815 

1816 

181? 120017 

1818 

1819 

3.820 

1821 

1822 

1823 

1824 

182b 

1826 
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6S.V VIA CHIP 



SF : Q 0042 



; WHEN READING THIS REG . , THE CURRENT STATE OF THE TNT. ENABLE REG. IS RETURNED. 
} THE BIT ASSIGNMENTS ARE THE SAME AS FOR VIAIFR AS DEFINED ABOVE. 



i* OUTPUT REGISTER A - "ORA" -- READ ONLY (OR READ/WRITE UNDER CONTROL OF 'DQPA") 



VIAORA 



120017 



I ADDRESS OF THIS REGISTER 



HEX 



AOXF 



THIS AODRESS ACCESSES THE SAME DATA AS "VIAMS" EXCEPT THAT NO "HANDSHAKING 
WILL TAKE PLACE (I.E. THERE IS NO CHANGE IN IRQ OR CA2 AS A RESULT OF 
READING ORA THROUGH THIS ADDRESS) 

I THE BIT ASSIGNMENTS ARE THE SAME AS FCR "VIAMS" ABOVE. 
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SEQ 0045 



\&?b 




1829 




1830 




1831 




1832 




1833 




,834 


12i000 


1835 


121400 


1836 




1(33? 




1838 




183^ 


100000 


1840 


001000 


1841 




1842 


000002 


184 3 


OOOOOl 


1644 




184b 


040000 


1846 


001000 


104/ 




1848 


000200 


1849 




1850 


100000 


1851 


040000 


1852 


020000 


1853 





, SBTTl REGISTER DEFINITIONS 



HISC 



I* SUITCH PACKS 

i "BOOT ADDRESS" SWITCH PACK (A200) 
j"DDCHP ADDRESS" SWITCH PACK (A300] 



{FLAG TO REQUEST H3254.5 CHECK 

{STARTING ADRS OF RAM PAGE 2 (POPS 0200 HEX) 

jSELECT V.35 OR EIA 423/232C 
I SELECT INTEGRAL MODEM 

jKILL RXEN DURING "INITRN" 
iKILL TTLOOP DURING "INITRN" 

^DISABLE INITIAL TBMT-0 CHECK IN TXCHAR 

{DISABLE INITIAL RDA-0 CHECK IN RxCHAR 

{DISABLE FINAL RQA-1 CHECK IN RXCHAR 

{DISABLE RXACT-1 CHECK AFTER CLOCKING (RXCHAR) 



SWPBOT • 
SWPDDCMP 


• 121000 
- 121400 


{MISCELLANEOUS EQ 


TCCHEK ■ 
RAMADR • 


■ BIT15 

■ 001000 


EIAV35 
INTGRL ' 


• BIT1 
■ BITO 


NCRXEN ■ 
NOLOOP ' 


■ BIT14 
' BIT9 


NCTBMT « 


■ BIT7 


NOCRDA - 
NFCRDA « 
NCRACT • 


- BIT15 

• BIT14 

• BIT13 



CNDMCAO 


0MV11 t. 


INL UNI 


GLOUAl. DATA SECTION 


211? 






2114 






2115 






2116 






211"/ 






2118 






23 10 






2; 20 






2121 






2122 






2123 






2124 


002246 

002246 






002246 


000000 




002250 


000000 




002252 


000000 




002254 


000000 


2123 






2126 






2\?7 






212ft 






2123 


002256 




2130 


002256 


000000 


2131 


002260 




2132 


002260 


000000 


?iZ.i 


T/J2262 




215-< 


002262 


000000 


2135 


002264 




2136 


OC22M 


000000 


2137 


00226* 




2136 


002266 


000000 


2139 


00?270 




2140 


0022 /O 


000000 


2141 


002272 




2142 


O02272 


000000 


214.' 


002271 




2144 


0022 /4 


000000 


2145 


0^322 76 


000000 


23 46 


002300 


000000 


?i*7 


002302 


oooooo 


2148 


002304 


000000 


2149 


002506 


oooooo 


2150 


002510 


oooooo 


2151 


002312 


oooooo 


2152 


002314 


oooooo 


2155 






21S4 
2Uo 

2156 


002316 








215V 


002336 





i'/l 
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SEQ 0044 



.S6TTL GLOBAL DATA SECTION 

;/ THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 

}/ IN MORE THAN ONE TEST. 

\///'////////////////// ////////////////////////////////////////////// ///////// 

j CONTROL BLOCK FOR STACKED ERROR MESSAGES 



ERRTBL 



LJERRTBL: j 



.WORD 





.WORD 





.UORD 





.WORD 






ERRTYP 
ERRNBR 
ERRMSG 
ERRBLK 

♦ STORAGE FOR DEVICE REGISTERS 

********* 



WSRO: 
BSRO: 
WSR2: 
BSR1: 
USR4: 
BSR2: 
WSR6: 
BSR3; 
WSR10 
BSR4: 
WSR12 
BSR5: 
USR14 
BSR6: 
USR16 
8SR7? 
BSR10 
B5R11 
BSR12 
BSR13 
BSR14 
BSR15 
BSR16 
BSR17 

UREGS 



.WORD 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 





























.BLKW 8. 



{STORAGE FOR DEVICE CSR REGISTERS 



VREGSi .BLKW 16. 



j THE C IRST 7 ARE FOR THE UStRT'S ACTUAL 

jREGISTERS. THE LAST ONE IS FOR THE STATUS 
jREG. (USTATR). 

j STORAGE FOR VIA REGISTERS FOR PRINTOUT 
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SEQ 0045 



2159 
2160 
2161 
2162 
2163 
2164 
2165 
2166 
2167 
2168 
2169 
2170 
2171 
2172 
2173 
21^4 
U75 
2176 
2177 
2178 
2179 
2180 
2181 
2182 
2183 
2184 
2185 
2186 
2187 
2188 
21*9 
2190 
2191 
2192 
2193 



0027. 7 »;, 
002400 
002402 
0024 *>A 
002406 
002410 
002412 
002414 
0024 U 
002420 
002422 

002424 

0024c >. 

0024*0 
0024*2 
002434 
0024^*' 
0024-vO 
0024*2 
0024 4<V 
00244 o 
0024^C 
0024:, 2 
0024 M 
0024 S-i 
0024*>0 
0024*i ;■ 
002<t>* 
002** 6*. 
0024 70 



OOOOOO 
000000 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
00<>000 
OOOOOO 

OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 



;♦ MISCELLANEOUS STORAGE 



TOATA: 


,UORD 





GDATA: 


,UORD 





BDATA: 


.WORD 





XDATA: 


.WORD 





SCRACH 


.WORD 





LOGDEV 


.WORD 





REGNUM 


.WORD 





PSTACK 


.WORD 





PRIOR: 


.WORD 





SUBRPC 


.WORD 





INTFLG 


.WORD 





ERRFLG 


.WORD 





TIMFLG 


.WORD 





RET ADR 


.WORD 





REDBYT 


.WORD 





WRIBYT 


.WORD 





LOAOAT 


.WOPO 





GOOOAT 


.WORD 





BAOOAT 


.WORD 





FRSTIM 


.WORD 





SAVE4; 


.WORD 





SAVE6: 


.WORD 





ERR0R1 


.WORD 





CMPTYP 


.WORD 





SAVLEN 


.WORD 





DEVMAP 


.WORD 





DEVPTR 


.WORD 





UNIT: 


.WORD 





STARES 


.WORD 





TSTNUM 


> ♦WORD 






ft******************************************** 

TEST DATA 

GOOD DATA 

BAD DATA 

EXCLUSIVE -OR BETWEEN GOOD AND BAD DATA 

GEN'L PURPOSE SCRATCH WORD 

LOGICAL DEVICE NLWBER 

CONTAINS A DEVICE REGISTER NUMBER 

CONTAINS BASE LEVEL PROGRAM STACK POINTER 

CPU PRIORITY FOR PRINTOUT 

PC OF SU6R CALL FOR ERROR REPORTS 

INTERRUPT RECEIVED FLAGS 

CIT FOR TX, BIT 1 FOR RCV 
SUBROUTINE EPROR FLAG 
EVENT TIME-OUT FLAG 
SUBR ERROR RETURN ADDRESS 
LO BYTE CONTAINS BYTE READ FROM LU REG 
LO BYTE CONTAINS BYTE TO LOAD INTO LU REG 
CONTAINS TEST DATA LOADED INTO REG 
STORAGE FOR EXPECTED DATA 
STORAGE FOR ACTUAL OATA 
FLAG-0 IF PROGRAM JUST LOAOED 
SAVE LOC 4 HERE (ERROR TRAP VECTOR) 
SAVE LOC 6 HERE (ERROR TRAP VECTOR) 
SUBR ERR. BIT FLAGS (DEF'O IN GLOBAL EQUATES) 
USYRT CHIP TYPE, -0 FOR SMC. ELSE »1 
SAVED TX AND RCV CHAR LENGTHS 
BIT MAP OF ACTIVE DEVICES 
DEVICE MAP BIT POINTER 
CONTAINS UNIT NO. (1 TO N) 

FLAG TO SHOW NQ. OF PASSES SINCE STA QR RES 
jNO. OF CURRENT TEST (FOR SOME TESTS) 
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SEQ 0046 



2196 


002* ;j 




219/ 


0024 72 




2198 


0024 72 


160020 


2199 


002* ft 


160021 


2200 


0024/6 




2201 


0024 7b 


160022 


2202 


002 r >00 


160023 


2203 


00250? 




2204 


CO*-. 50? 


160024 


2205 


002504 


160025 


2206 


002506 




2207 


002506 


160026 


2203 


002510 


160027 


2209 


002512 




2210 


002512 


160030 


22 U 


002514 


16C031 


22 L2 


002516 




2213 


002516 


160032 


2214 


0C252U 


160033 


2215 


002522 




2216 


0025:;2 


160034 


2217 


002524 


1' 0035 


2218 


002V6 




2219 


002526 


160036 


2220 


0025? 


160037 


2221 






2222 


002532 


000300 


2223 


00?5?4 


000304 


2224 


002536 


000240 


2225 


002540 


oooooo 


2226 


<\>2542 


000000 


2227 


v>02544 


oooooo 


2228 


GV2S46 


oooooo 


222*? 


002550 


000001 


2230 






2231 







j . ***** 

BSELO: 

SELO: 

MPCSRj 

BSEL1: 

B5EL2: 

SEL2; 

BSEL.3: 

BSEL4? 

SEL4: 

B5EL5: 

BSEL6: 

SEL6: 

BSEL7; 

BSEL10: 

SEL10: 

BSELli: 

BSEL12: 

SEL12: 

BSEL13: 

BSEL14: 

SEL14: 

BSEL15: 

BSEL16; 

SEL16: 

BSEL17: 

MPIVEC 
MPOVEC 
MPRIOR 
LUSWI1 
LUSWI2 
BRDTYP 
TSTCON 
BORATE 



+ *** CURRENT DEVICE PARAMETERS 



* ************ 



.WORD 
.WORD 

.WORD 

.WORD 

.WORD 
.WORD 

.WORD 
.WORD 

.WORD 
.WORD 

.WORD 
.WORD 

.WORD 
.WORD 

.WORD 
.WORD 

.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



160020 
160021 

160022 
160023 

160024 
160025 

160026 
160027 

160030 
160031 

160032 
160033 

160034 
160035 

160036 
160037 

300 
304 
240 





1 



{POINTER TO DMV11 CSR'S 
jPOINTER TO BSEL1 

jPOINTER TO SEL2 
jPOINTER TO BSEL3 

jPOINTER TO SEL4 
POINTER TO BSE1.5 

jPOINTER TO SEL6 
jPOINTER TO BSEL7 

jPOINTER TO SEL10 
; POINTER TO BSEL11 

jPOINTER TO 3EL12 
{POINTER TO BSEL13 

jPOINTER TO SEL14 
;POINTER TO BSEL15 

jPOINTER TO SEL16 
jPOINTER TO BSEL17 

jDMVll INPUT INTERRUPT VECTOR 
jDMVll OUTPUT INTERRUPT VECTOR 
jDMVll DEVICE PRIORITY 
:LINE unit switch PACK 01 

jLINE UNIT SWITCH PACK 02 
jO-M6064, 1-MG053/V.35.2-M8053/EIA 
;TEST CONNECTOR INDICATOR 
jBAUO RATE - 56 K 
; » 19.2 K 
} 1 - 56 K 



CNOMCAO DMV11 I I Mr UNIT DIAGl 

GLOBAL DATA SUCTION 



223^ 

2234 
2235 
2276 
225/ 
2258 
2239 
2240 
2241 
2242 
224 3 
2244 
2245 
2246 
224" 
2243 
2249 
2250 
2251 
2252 
22i± 
2254 
2255 
2256 
2257 

2259 
2260 
2261 
2262 
2265 
2264 
2265 
2266 
2267 
22t>8 
2269 
2270 
2271 
2272 
2273 
2274 
2275 



00^552 
002554 
0C2556 
0^2560 
002 V 2 
002564 
002566 
002570 



002572 



002602 
002*04 
00260*. 
002610 
00201 y 
002614 

002616 

002620 



002622 
002t»?4 
002626 
002550 
002652 
002634 
002656 
002640 



002t>4> 
002G4 2 
00264.$ 
00264 4 
002645 
002646 
00264 .• 
002650 

002651 



120400 
120401 
120402 
120403 
120404 
120405 
120407 
J 22000 



OOOOOO 
OOOOOC 
OOCOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 



OOOOOO 
OOOOOO 

OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 



377 
000 
000 
360 
000 
000 
347 
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i TABLE Or USrRT REGISTER ADDRESSES 



5EQ 004 7 



I ADORE SS OF RDSRL 

i ADDRESS Of RDSRH 

j ADDRESS OF TDSRL 

j ADDRESS Of TDSRH 

j ADDRESS OF PC5ARL 

I ADDRESS OE PC5ARH 

i ADDRESS or PCR 

j ADDRESS Of UGYRT STATUS REG 



;*♦*** STORAGE FOR DATA READ IN ADDRESS TESTS **♦♦♦ 
REDDAT: .BLKB 8. 



USYREG; . UORD 


120400 


.WORD 


120401 


.WORD 


120402 


.WORD 


120403 


.WORD 


120404 


.WORD 


120405 


.WORD 


120407 


.WORD 


122000 



.;•*** GENL PURPOSE SCRATCH STORAGE ♦ **♦♦ 


REGO 


.WORD 







REG1 


.WORD 







REG2 


.WORO 







REG3 


.WORD 







REG4 


.WORD 







REG5 


.WORD 







REG6 


.WORD 







REG7 


.WORD 







;;**** .CrRATCH 


STORAGE 


FOR MESSAGE REPORTING 


TMPO 


.. 3D 







TMPl 


.- :u 







TMP 


: : <*0 







TMP 


! Ab 







TMP*. 


..40RD 







TMP5 


.WORD 







TMP6 


.WORD 







TMP7 


.WORD 







; ♦♦♦« 


>♦ IN8US LU 


REG BIT 


MASKS FOR UNPREDICTABLE 


UPBI* 


rs: 








.BYTE 


377 


j MASK FOR RD6R 




.BYTE 


000 


l MASK FOR ROSR 




.BYTE 


000 


j MASK FOR TDBR 




.B*TE 


360 


j MASK FOR TDSR 




.BYTE 


000 


,MASK FOR SSAR 




.BYTE 


000 


iMASK FOR PCSAR 




.BYTE 


34 7 


jMASK FOR PCR 



***** 



;oo 



TDSRNRW: ,BYTE 200 



j TDSR NON-R/W BITS 



n 



CNOHC'O OMV11 LINK UNH 0IAG1 
OAi.; T .5t PATTERNS 
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bEQ 004Q 



2*-? 7 8 






>.. ^ 






2280 


002o52 




22*1 


00?:6 52 


377 


2^82 


00265S 


377 


■ ; 2\i3 


0026 ■'. 


b7 7 


?. *>'4 


0026:')^ 


377 


2 ■■•... 5 


002656 


377 


J2i& 


00265 ' 


37 7 


22*7 


002660 


3"? 


22^* 


002661 


366 


r n aj 






2290 






;• , 9i 


002662 




2^92 


002662 


000 


?; ? 43 


002665 


000 


rr c >4 


002664 


000 


2295 


00266S 


000 


22 r ?6 


002666 


000 


2297 


002667 


000 


22 )h 


002670 


000 


2299 


002671 


110 


2b0o 






2301 






2302 


"02672 




2-;05 


OC2672 


000 


2304 


C0267? 


001 


23Q5 


002b 74 


003 


2306 


0026 75 


004 


2307 


002676 


oos 


2*^8 


O026 77 


007 


230^ 


0C"700 


100 


2310 


002 701 


101 


2311 


r ^702 


103 


2312 


X>2703 


104 


2313 


X>2704 


10b 


23U 


002 705 


107 


2315 


002706 


000 


2316 


002707 


017 


2317 


002710 


02 7 


2316 


002711 


041 


2319 


002712 


200 


2320 


002713 


277 


2321 


002714 


103 


2322 


002715 


144 


2323 


002716 


115 


2324 


002717 


157 


2325 


002720 


000 


2326 






2327 






2328 


002721 




2329 


002721 


125 


2330 


002722 


252 


2331 


002723 


000 


2332 


002724 


$77 


2333 


002725 


000 


2334 


002726 


001 



.SBTTL 

; + ♦ + * + 

PATEj 



DATA TEST PATTERNS 
DATA PATTERN E **4* + 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 



3/7 
577 
377 
377 
377 
37 7 
377 
J66 



.**♦+* DATA PATTERN F ***** 
PATF; 



BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BtTE 
BYTE 
BYTE 



000 
000 
000 
000 
COO 
000 
000 
110 



;**♦** DATA PATTERN G ***** 
PATGt 



.BYTE 
.BYTE 
.BYTt 
.BYTE 
.BYTE 
.BVTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BY)E 
.BYTE 
.BYTE 
.BYTE 



000 
001 
003 
004 
005 
007 
100 
101 
103 
104 
105 
107 

000 
017 
027 
041 
200 
277 
103 
144 
115 
157 
000 



i***** DATA PATTERN H ***** 
PATH: 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTt 



125 
252 

000 
377 
000 
001 



K4 
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DATA TEST PATTERNS 



SEQ 0049 



2335 


002727 


002 


2336 


002730 


004 


2337 


002731 


010 


2338 


002732 


020 


2339 


002733 


040 


2340 


0C2734 


100 


2341 


002735 


200 


2542 


002736 


000 


2343 


002737 


377 


2344 


002740 


376 


2345 


002741 


375 


2346 


002742 


373 


234 7 


002743 


367 


2348 


002744 


357 


2349 


002745 


337 


2350 


002746 


277 


2351 


00274 7 


17/ 


2352 


002750 


377 


2353 


002751 


000 


2354 






2355 






2356 


002752 




2357 


002752 


000 


2358 


002753 


041 


2359 


002754 


102 


2360 


002755 


143 


2361 


002756 


204 


2362 


002757 


245 


2363 


002760 


306 


2364 


002761 


347 


2365 


002762 


000 


2366 


002763 


001 


2367 


002764 


002 


2368 


002765 


004 


2369 


002766 


040 


2370 


002767 


100 


2371 


002770 


200 


2372 


002771 


000 


2373 


002772 


346 


2374 


002773 


345 


2375 


002774 


343 


2376 


002775 


307 


2377 


002776 


247 


2378 


002777 


14 7 


2379 


003000 


34 7 


2380 


003001 


242 


2381 


003002 


105 


2382 


003003 


347 


2383 


003004 


010 


2364 


003005 


020 


2385 


003006 


367 


2386 


003007 


357 


2387 


003010 


030 


2388 


003011 


027 


2389 


003012 


377 


2390 






2391 







.BrTE 


002 


.BYTE 


004 


.BYTE 


010 


.BYTE 


020 


.BYTE 


040 


.BYTE 


100 


.BYTE 


2C0 


.BYTE 


000 


.BYTE 


377 


.BYTE 


376 


.BYTE 


375 


.BYTE 


373 


.BYTE 


367 


.BYTE 


357 


.BYTE 


337 


.BYTE 


277 


.BYTF. 


177 


.BYTE 


377 


.BYTE 


000 


****** DATA PATTERN I ***** 


PATI: 




.BYTE 


000 


.BYTE 


041 


.BYTE 


102 


.BYTE 


143 


.BYTE 


204 


.BYTE 


245 


.BYTE 


306 


.BYTE 


34 7 


.BYTE 


000 


.BYTE 


001 


.BYTE 


002 


.BYTE 


004 


.BYTE 


040 


.BYTE 


100 


.BYTE 


200 


.BYTE 


000 


.BYTE 


346 


.BYTE 


345 


.BYTE 


343 


.BYTE 


307 


.BYTE 


24 7 


.BYTE 


147 


.CYTE 


34 7 


.BYTE 


242 


.BYTE 


105 


.BYTE 


34 7 


.BYTE 


010 


.BYTE 


020 


.BYTE 


367 


.BYTE 


357 


.BYTE 


030 


.BYTE 


027 


.BYTE 


377 


j***** DATA PA' 


TTERN J ***** 



3K= 



CNDMCAO OMVil L.INt. UNIT DIAG1 
DATA TEST PATTERNS 



1. 'I 
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SEQ 0050 



239? 


003013 




2393 


003013 


000 


2394 


003014 


000 


2395 


003015 


001 


2396 


003016 


002 


2397 


003017 


004 


2398 


003020 


020 


2399 


003021 


040 


2400 


003022 


010 


2401 






2402 






2403 


003023 




2404 


003023 


000 


2405 


003024 


377 


2406 


003025 


376 


2407 


003026 


375 


2408 


003027 


373 


2409 


003030 


376 


2410 


003031 


177 


24J.1 


003032 


377 


2412 


003033 


000 


2413 


003034 


001 


2414 


003035 


002 


2415 


003036 


004 


2416 


003037 


010 


2417 


003040 


200 


2418 


003041 


12^ 


2419 


003042 


252 


2420 


003043 


000 


2421 






2422 






2423 


003044 




2424 


0)3044 


000 


2425 


003045 


017 


2426 


003046 


016 


2427 


003047 


015 


2428 


003050 


013 


2429 


003051 


016 


2430 


003052 


017 


2431 


003053 


017 


2432 


003054 


000 


2433 


003055 


001 


2434 


003056 


002 


2435 


003057 


004 


2436 


003060 


010 


2437 


003061 


000 


2438 


003062 


005 


2439 


003063 


012 


2440 


003064 


000 



PATJ; 



; ***** 

PATK: 



PATL; 



.BYTE 


000 


.BYTE 


000 


.BYTE 


001 


.BYTE 


002 


.BYTE 


004 


.BYTE 


020 


.BYTE 


040 


.BYTE 


010 


ATA PATTERN K ***** 


.BYTE 


000 


.BYTE 


377 


.BYTE 


376 


.BYTE 


375 


.BYTE 


373 


.BYTE 


376 


.BYTE 


177 


.BYTE 


377 


.BYTE 


000 


.BYTE 


001 


.BYTE 


002 


.BYTE 


004 


.BYTE 


010 


.BYTE 


200 


.BYTE 


125 


.BYTE 


252 


.BYTE 


000 


ATA PATTERN L ***** 


.BYTE 


000 


.BYTE 


017 


.BYTE 


016 


.BYTE 


015 


.BYTE 


013 


.BYTE 


016 


.BYTE 


017 


.BYTE 


017 


.BYTE 


000 


.BYTE 


001 


.BYTE 


002 


.BYTE 


004 


.BYTE 


010 


.BYTE 


000 


.BYVE 


005 


.BYTE 


012 


.BYTE 


000 



E"£S3 



CNDMCAO DMV11 LINE. UNIT DIAG1 
DATA TEST PATTERNS 
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SEQ 0051 



2442 






2443 






2444 


003065 


000 


2445 


003066 


003 


2446 


003067 


014 


2447 


003070 


060 


2448 


003071 


001 


2449 


003072 


007 


2450 


003073 


037 


2451 


003074 


177 


2452 






2453 






2454 


003075 


000 


2455 


003076 


140 


2456 


003077 


030 


2457 


003100 


006 


2458 


003101 


100 


2459 


003102 


160 


2460 


003103 


174 


2461 


003104 


177 


2462 


003105 




2463 







;*+*** DATA PATTERN Q ***** 



PATQ: 



BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 



000 
003 
014 
060 
001 
007 
037 
177 



j***** DATA PATTERN INVERTED Q ***** 



PATQB: 



ENDPAT 
.EVEN 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 



000 
140 
030 
006 
100 
160 
174 
177 



INVERTED 000 (7 BIT) 
INVERTED 003 (7 BIT) 
INVERTED 014 C7 BIT) 
j INVERTED 060 (7 BIT) 
INVERTED 001 (7 BIT) 
INVERTED 007 (7 BIT) 
INVERTED 037 (7 BIT) 
INVERTED 177 C7 BIT) 



CNDMCAO OMV1L LINE UNIT DIAG1 MACRO M1200 22 FE8-84 lf>:31 

DATA TEST PATTERNS 

2465 

2466 

2467 

2468 

2469 003106 

24 70 

2471 

24 72 



N4 

PAGE 25 



SEQ 0OS2 



;*** RECEIVED DATA BUFFER 
RCVBUF- .BLKW 64, 



(64, WORDS) +++ 



2473 



■) 1 



CNDMCAO DMVli I. TNI. UNIT DIAG1 
ULOOAL TEXT SECTION 



24 75 
24 76 
24 7 7 
2476 
.'4 79 
2 A 60 
2481 
2482 
2483 
2484 
2485 
2486 



MACRO M1200 22 rEB-84 I5j3t PAGE. 26 



.SBTTL GLOtJAl TF.XT SECTION 

j* THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 

I* MESSAGES, ANO ASCII INTORMATION THAT ARE USED IN 

\% MORE THAN ONE TEST. 



005306 
003306 
003306 
0033 VI 
003314 
003317 
003322 



248 7 

2488 

2489 

2490 

2491 

2492 

2493 003326 
003326 
003326 
STii - PART 1 Of 
003331 
003354 
003337 
003342 
003545 
0O3350 
003355 
003356 
003361 
003364 
003367 
00337a 

2494 
24 95 
2496 



115 
065 
117 
115 
066 



70 
063 
122 
070 
064 



000012 



3/ 



104 

055 
040 
116 
125 
124 
105 
123 
040 
122 
061 
106 
000 



0000X0 



115 

061 
114 
105 
116 
040 
123 
040 
120 
124 
040 
040 



060 
040 
040 
060 
000 



126 

061 
111 
040 
111 
124 
124 
055 
101 
040 
117 
063 



SEQ 0053 



i t 



I* NAMES OE DEVICES SUPPORTED BY PROGRAM 

;,*********************** ******* .*******, 

OEVTYP <M8053 OR M8064 > 



LIDVTYPj : 



.ASCI/ #M8053 OH M8064* 



.EVEN 



; i 



;* TITLE Of PROGRAM 
, , **•**************< 



.RADIX 10. 

DESCRIPT 



<DMV-U LINE UNIT TESTS - PART I 0* 3> 

LIDESC:: 



.ASCIZ /DMV-11 LINE UNI? TE 



* RADIX G* 



.EVEN 



CNOMCAO OMVU t INI- UNI I DTAG1 MACRO M1200 22 i Ftt 84 1 S : S 1 PAGE 27 
GLOBAL. SUBROUTINE SECTION 



SFCi 0054 



2504 
2505 

250 7 
2506 
250<* 
2510 
2:^11 
2512 
2513 
2514 
2515 
2516 
251/ 
25 18 
2519 
2520 
2521 
2522 
2523 
2524 
2525 
2526 
2527 
2528 
2529 
2530 
2531 
2532 
2533 
2534 
2535 
2536 



2537 
2536 
?53S 
2540 
2541 
2542 
254 3 
2544 



003402 
003404 
0O3410 
003412 

003414 
003422 
003424 
003430 

0O3436 

003436 
003444 
003452 
003460 
003466 
OOJ470 
003472 
003474 



.SBTTL GLOBAL SUBROUTINE SECTION 



SBTTl M-LOOP -- MSTCl R -- MASTER GUAR AND ENTER M LOOP 

MSTCLR -- MASTER CLEAR 6 ENTER M-LOOP 

CALLING SEQUENCE: 

JSR PC, MSTCLR 

BCC N$ i IF NO ERROR OCCURED, PROCEED WITH ROUTINE 

ERROR | AN ERROR MESSAGE HAS BEEN STACKED: PRINT If 

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE CLE. CKL00f>)> 



NJ: 



RESUMPTION OF NORMAL P!OCESSING> 



003374 112777 000301 177072 MSTCLR: MOVB 



010346 
012703 
07 7301 
012603 

132777 
001023 
004 737 
012737 



012737 
012737 
012737 
012737 
000261 
OOO401 
000241 
000207 



000030 



000200 

004210 
000301 



oooooi 

000001 
013211 
017030 



II: 



177054 
002400 



002246 
002250 
002252 
002254 



MOV 
MOV 
SOB 
MOV 

BITB 

BNE 

JSR 

MOV 

GTDF 



*RLN!MCLR!MREQ,8eSELl i INITIATE M-LOOP 

{WAIT FOR THE M-LOOP TO FINISH THE OPERATION 



R3.-CSP) 
«24. ,R3 
R3,U 
(SP)*,R3 



♦MRDY,8B5EL2 jDID THE M-LOOP FINISH 

51 lYES, GOOD. RETURN 

PC.GETWSR jGET BYTE SELECT REGISTERS 

♦RUN'MCLR'MREQ.GDATA , IDENTIFY REQUESTED FUNCTION 

EM3 , ERR4 j "MRDY " T IMEOUT 

j QLfct* "DEVICE F'ATAL 



51: 

9Vj 



SEC 
BR 

CLC 
RTS 



ERROR 9 1 




MOV 


#T.EDf .ERRTYP 


MOV 


♦l.ERRNBR 


MO',' 


*EH3,ERRMSG 


MOV 


*ERR4 # ERRBLK 



PC 



,SET CARRY TO INDICATE ERROR 

lEXTT WITH THE "ERROR" HAG (CARRY BIT) SET 

jCLEAR C BIT FOR NO ERRORS 

i RE TURN 
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.M-i OOP 

254 1> 

254 • 

2546 
25*9 
2 C -^ 

2551 

2554 
2555 
2556 

255 7 
2558 
2559 
2560 
2561 
2562 
2565 
2564 
2565 
2566 
2567 
2568 
2569 
2570 
2571 
2572 
257 3 
2574 
2575 
2576 



READ 



SFQ 0055 



25/7 
2578 
2579 
2580 
2581 
2582 
2583 
2584 
2585 
2586 



003476 
003502 

003510 
OC3512 
003516 
003520 

003522 
003530 

003532 
003536 
003544 

003544 
003552 
003560 
003566 
003574 
003576 

003600 
003602 
00J606 



012577 
112777 

0103*6 
012703 
077301 
012603 

132777 
001023 

004737 
012737 



000241 
117735 
000205 



SB Til. . . . .M-LOOP 



READ 



REAU • READ THE SPECIFIED ADDRESS WITHIN THE DMV 11 CM8053) 
CALLING SEQUENCE: 

JSR R5.READ 

.WORD < ADDRESS 0' REGISTER WITHIN DMV U> 

.UORD DESTINATION ADDRESS UITHIN L5M1> 

BCC Nf i IF NO ERROR OCCURED, PROCEED WITH ROUTINE 

ERROR ,AN ERROR MESSAGE HAS BEEN STACKED: PRINT IT 

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE (I.E. CKLOQPj> 

sRESUtlPTTON OF NORMAL PR0CESS1NG> 



Nf : 



17 7000 
000001 



000050 



1767fe6 



READ: 



If: 



000200 176746 



00*210 
000001 



012737 000001 

012737 0OOO02 

012737 013235 

012737 017030 
000261 
000401 



002400 



002246 
002250 
002252 
002254 



MOV 

MOVB 

MOV 

MOV 

soe 

MOV 

Biie 

BNE 

JSR 
MOV 
GTDF 



176700 



51: 
6f; 



SEC 
BR 

CLC 

MOVB 

RTS 



(R5)*.8SEL4 

*REDL0C,B8SEL2 

R3 # CSP) 
*40. ,R3 

R3,lf 
CSP)*.R3 

♦MR0Y.8BSEL2 
5f 

PC.GF.TWSR 

♦REDLOC.GDATA 

EM4,ERR4 



61 



8BSfcL6.SCR5)* 
R5 



jSETUP SOURCE POINTER 

I TELL M-LOOP TO GIVE. US THE REQUESTED DATA 



jWAIT FOR THE M-LOOP TO FINISH THE OPERATION 



iDID THE M-LOGP FINISH 
I YE 5, GOOO. RETURN 

iGET BYTE SELECT REGISTERS 

j IDENTIFY REQUESTED FUNCTION 

j "Mfs'DY" TIMEOUT 

t QUEUE "DEVICE FATAL" ERROR * 2 

MOV 
MOV 
MOV 
MOV 

j INDICATE AN ERROR HAS BEEN STACKED 

iRETURN WITH THAT INOICATION 

I INDICATE "NO ERROR" 

j PUT DATA WHERE CALLER WANTS IT 

l RE TURN 



*T.EDF,ERRTtP 
02.ERRNBR 
♦EM4.ERRMSG 
$ERR4,ER.':BLK 
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.M-LOOP 

2586 
2589 
2590 
2591 
.?592 
2595 
2594 
2595 
2596 
2597 
2598 
2599 
2600 
2601 
2602 
2603 
2604 
2605 
2606 
2607 
2608 
2609 
2610 
2611 
2612 
2613 
2614 
2615 
2616 
2617 
2618 
2619 



READ IMMEDIATE 



SLQ 0056 



2620 
2621 
2622 
2623 
2624 
2625 
2626 
2627 
2628 
2629 



003610 
003610 
003614 

003622 
003624 
003630 
003632 

003634 

003642 

003644 
003650 
003656 

003656 
003664 
003672 
003700 
003706 
003710 

003712 
003714 
003720 



012577 
112777 

010346 
012703 
077301 
012603 

132777 
001023 

0O4737 
012737 



012737 
012737 
012737 
012737 
000261 
000401 

000241 
017725 
000205 



176666 

000001 



000050 



004210 
000001 



000001 
000003 
013235 
017030 



176566 



SBTTL M-LOOP 

READI 



READ TMMEDIATF 
READ IMMEDIATE THE SPECIFIED ADDRESS WITHIN THE DMV-11 CM8053) 
CALLING SEQUENCE: 



j<$r R5 READI 

I WORD < ADDRESS OF REGISTER WITHIN DMV-11> 

.WORD DESTINATION -- CONTENTS OF REG. IS PUT HERE > 

BCC N$ ,IF NO ERROR OCCURED. PROCEED WITH ROUTINE 

ERROR j AN ERROR MESSAGE HAS BEEN STACKED: PRINT IT 

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE (I.E. CKL0OPJ> 



N$ 



RESUMPTION OF NORMAL PROCESSING> 
READI: 



176654 



1$ 



000200 176634 



002400 



002246 
002250 
002252 

002254 



MOV 
MOVB 

MOV 
MOV 

soe 

MOV 

BITB 
BNE 

JSR 
MOV 
GTDF 



5* 
6* 



SEC 
BR 

CLC 
MOV 
RTS 



(R5)»»8SEL4 
#REDL0C.8BSEL2 

R3.-CSP) 
#40.. R3 
R3.ll 
(SP*,*.R3 

#MRDY,aeSEL2 
5* 

PC.GETWSR 

♦REDLOCGDATA 
EM4 t ERR4 



6J 



8SEL6 f CR5)* 
R5 



; SETUP SOURCE POINTER 

j TELL M-LOOP TO GIVE US THE REQUESTED DATA 



;WAIT FOR THE. M-LOOP TO FINISH THE OPERATION 



,DID THE M-LOOP FINISH 
I YES. GOOD. RETURN 

jGET BYTE SELECT REGISTERS 

i IDENTIFY REQUESTED FUNCTION 

;"MRDY» TIMEOUT 

j QUEUE "DEVICE FATAL" ERROR 9 3 

MOV 
MOV 
MOV 
MOV 

jINOICATE AN ERROR HAS BEEN STACKED 

iRETURN WITH THAT INDICATION 

j INDICATE "NO ERROR" 

,PUT DATA WHERE CALLER WANTS IT 

j RE TURN 



OT.EDF.ERRTYP 

#3.ERRNBR 

*EH4.ERRt1SG 

0ERR4.ERR81K 



CNOMCAO DMV11 LINE UNIT DIAG1 

M-LOOP -- WRITE 

26.M 

2633 
2654 
2635 
2636 
2637 
2638 
2639 
2640 
2b41 
2642 
264 3 
2644 
2645 
2646 
264 7 

2648 003722 012577 176554 

2649 003726 113577 176554 

2650 003732 000404 
2651 

2652 
2653 
2654 
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.SBTTL M-LOOP - - WRITE 

WRITE WRITE THE SPECIFIED DATA INTO THE SPECIFIED DMV-11 ADDRESS 

i CALLING SEQUENCE: 

JSR R5 WRITE 

.WORD <ADDRESS OF REGISTER WITHIN DMV-ll> 

.WORD ^ADDRESS OF DATA BYTE> 

BCC NS ;IF NO ERROR OCCURED, PROCEED WITH ROUTINE 

ERROR j AN ERROR MESSAGE HAS BEEN STACKED: PRINT IT 

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE (I.E. CKL00P)> 

N$: RESUMPTION OF NORMAL PROCESSING* 



SEQ 005 7 



WRITE: MOV 
MOVB 
BR 



(R5^.8SFL4 

0CR5)> ( SSEL6 

MLWRI 



j SETUP SOURCE POINTER 

j MAKE, DATA AVAILABLE TO M-LOOP 

{THE REST OF THIS ROUTINE IS THE SAME AS "WRITE! 



CNDMPAO DMV1A LINE. UNIT DIAG1 

M-LOOP -- WRITE IMMEDIATE 

2656 
265/ 
2658 
2659 
2660 
2661 
2662 
2663 
2664 
2665 
2666 
2667 
2668 
2669 
2670 
2671 
2672 
2673 
2674 
2675 
2676 
2677 
2678 
2679 
2680 
2681 
2682 
268? 
2684 
2685 
2666 
268V 



2688 
2689 
2690 
2691 
2692 
2693 
2694 
2695 
2696 



003734 
003734 
003740 
003744 

003752 
003754 
003760 
003762 

003764 
003772 
003774 
004000 
004006 

004006 
004014 
004022 
0O403C 
004036 
004040 

004042 

004044 



012577 
012577 
11277? 

010346 
012703 
077301 
012603 

132777 

001023 
004 737 
012737 



012737 
012737 
012737 
012737 
000261 
000401 

000241 
000205 



176542 
176542 
000002 



000050 



000200 

004210 
000002 
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.SBTTL ....M-LOOP -- WRITE IMMEDIATE 

WRITEI - WRITE IMMEDIATE THE SPECIFIED DATA INTO THE SPECIFIED DMV-11 ADDRESS 

CALLING SEQUENCE: 

JSR P5 WRITE T 

.WORD <ADORESS Of REGISTER WITHIN DMV-11> 

.WORD <DATA FIELO -- DATA TO BE WRITTEN IN DMV - U > 

BCC N$ { IF NO ERROR OCCURED, PROCEED I'liH ROUTINE 

ERROR | AN ERROR MESSAGE HAS BEEN STACKED; PRINT IT 

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HE<\E (I.E. CKLOOP)> 

j N$: RESUMPTION OF NORMAL PROCESSING 

# 

• - --* + + * + + + + + * + + ++ * + + 4. + *4.*.+. + + + +4, + 4.+ 4 L + 4 L + ++**.4, + + + + + *** + + + ** + ** + + ****. tm**tmm 

WRITEI: 



SEC) 0058 



176524 MLWRI 



1$ 



0OOO01 
000004 

013235 
017030 



176504 
002400 



002246 
002250 
002252 
002254 



MOV 
MOV 
MOVB 

MOV 
MOV 
SOB 

MOV 

BITB 

BNE 

JSR 

MOV 

GTDF 



51 
6* 



SEC 
BR 

CLC 
RTS 



(R5)*,aSEL4 
(R5)*,8SEL6 
*WRIL0C,Q6SEL2 

R3,-CSP) 
#40. ,R3 
R3.1* 
(SP)».R3 

*MRDY,fi6SEL2 
5$ 

PC.GETWSR 
*WRIL0C,GDATA 
EM4 , ERR4 



6* 



R5 



j SETUP SOURCE POINTER 

jMAKE DATA AVAILABLE TO M-LOOP 

jTELL M-LOOP TO WRITE THE DATA 



jWAIT FOR THE M-LOOP TO FINISH THE OPERATION 



;DID THT M-LOOP FINISH 

} YES. GOOO. RETURN 

iGET BYTE SELECT REGISTERS 

i IDENTIFY REQUESTED FUNCTION 

;"MRDY" TIN* OUT 

; QUEUE. "DEVICE FATAL" ERROR * 4 

MOV 
MOV 
MOV 
MOV 

iINOICATfe' AN ERROR HAS BEEN STACKED 

I RETURN WITH THAT INOICATION 



*T,EDF t ERRTYP 
*4,ERR»«R 
*£M4,ERRMSG 
0ERR4.ERRBLK 



j INDICATE "NO ERROR" 
{RETURN 
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GETBSR -- GET BYTE SEl LCT RfcGlSTERS 



SEQ 0059 



2693 
2699 
2700 
2701 
2 702 
2703 
2704 
2 .'05 
2706 
2707 
2708 
2709 
2710 
?,U 
27iir 
2713 
2714 
2715 
2716 
2717 
2718 
2719 
2720 
2721 
2722 
2723 
2724 
2725 
2726 
'727 
>V22 
2 729 
2730 
2731 
2732 
2733 
2734 
2735 
2736 
2737 
2738 
2739 
2740 
2741 
2742 
2743 



004046 
004054 
004062 
004070 
004076 
004104 
004112 
004120 
004126 
0O413* 
004142 
004150 
004156 
004164 
004172 
0,1200 
004206 



004210 
004216 
004224 
0O4232 
004240 
004246 
004254 
004262 
004270 



117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
117737 
000207 



017737 
017737 
017737 
017737 
017737 
017737 
017737 
017737 
000207 



176420 
176414 
176410 
176404 
176400 
176374 

176370 
176364 
176360 
176354 
176350 
176344 
176340 
176334 
1763*0 
176324 



176256 
176254 
176252 
176250 
176246 
176244 
176242 
176240 



002256 
002260 
002262 
002264 
002266 
002270 
002272 
002274 
002276 
002300 
002302 
002304 
002306 
002310 
002312 
002314 



SBTTL GETBSR -- GET BYTE SELECT REGISTERS 

GET THE CONTENTS OF ALL CONTROL AND STATUS REGISTERS 

FUNCTION - THIS SUBROUTINE COLLECTS THE CONTENTS OF THE 

BYTE SELECT REGISTERS FOR THE PURPOSE OF DISPLAf. 

ENTRY CONDITIONS - NONE 

EXIT CONDITIONS - NONE 

REGISTERS DESTROYED - NONE 



00 





0000 





*<? 











c 


d V? 








00 





#0 


<t Q 








*##*0 





00 


0000 


0000 









002256 
002260 
002262 
002264 
002266 
002270 
002272 
002274 



GETBSR: MOVB 
MOVB 
HOVB 
MOVB 
MOVB 
MOVB 
MOVB 
MOVB 
MOVB 
MOVB 
MOVB 
MOVB 
MOVB 
MOVB 
MOVB 
MOVB 
RTS 



8BSEL0.BSR0 

SBSEL1.BSR1 

86SEL2.BSR2 

8eSEL3,BSR3 

0eSEL4 t BSR4 

86SEL5.BSR5 

aBSEL6,BSR6 

86SEL7.BSR7 

S8SEL10.8SR10 

SeSELll.BSRll 

86SEL12.BSR12 

aeSEL13 # BSR13 

8BSEL14.BSR14 

BBSEL15.BSR15 

86SEL16.BSR16 

SBSEL17.BSR17 

PC 



;PUT THE CURRENT CSR VALUES INTO THE PRINT -OUT 
{TABLE 



{RETURN TO CALLER 



.SBTTL GETWSR -- GET WORD SELECT REGISTERS 

i "WORD" VERSION OF ABOVE SUBROUTINE 



GETWSR: MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTS 



8SEL0.WSR0 
SSEL2.USR2 
SSEL4.WSR4 
SSEL6.WSR6 

SSEL10.WSR10 
SSEL12.WSR12 
SSEL14.WSR14 

SSELi6tWSRi6 
PC 



;M0VE THE 4 WORD REGISTERS TO THE OTHERWISE 
tBYTE TABLE 



{RETURN TO CALLER 
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STUREG -- STATIC TEST OF' SPECIFIED USiRT REGISTER 



5EQ 0060 



2 745 
2746 
274 7 
2748 
2749 
2 750 
2751 
2/52 
2 753 
2 754 
2755 
2756 
2757 
2758 
2 759 
2760 
2761 
2762 
2763 
2764 
2765 
2766 
2767 
2768 
2769 
2770 
2771 
2772 
2773 
2774 
2775 
2776 
2777 
2778 
2779 
2780 
2781 
2782 
2783 



2784 
2785 
2786 
2787 
2/88 
2789 
2790 
2791 
2/92 
2793 



004272 
004276 

00430? 
0O43>6 
0O4310 
0O4312 

004314 
OO4320 
0O4324 
004326 
004330 

0O4332 
004340 

004342 
004344 

0O4344 
0O4352 
0O4360 
004366 
004374 
004376 



010037 
010037 

004537 
000000 
002376 
103431 

005037 
004537 

oooooo 

002402 
103422 

123737 
000241 

001415 



012737 
012737 
012737 
012737 
000261 
000207 



SBTTL STUREG - STATIC TEST Of SPECIFIED USYRT REGISTER 

♦ *+***** + * + * + ********* + ***»***** + ** + + ** + ** + **** + * + + **** + »****««** + ** !:.***♦* + *♦ 

STUREG -- PERFORM A STATIC TEST OF THE SPECIFIED USYRT REGISTER 

CALLING SEQUENCE: 

<R0 CONTAINS THE ADDRESS OF THE 'EGISTER TO BE TESTED> 

<"TDATA" CONTAINS THE TEST BYTE> 

<"GDATA" CONTAINS THE EXPECTED DATA> 

<"REGNUM" CONTAINS REG INDEX FOR POSSIBLE ERRORS> 

JSR PC. STUREG 

BCC N$ i IF NO ERROR OCCURED, PROCEED UITH ROUTINE 

ERROR {AN ERROR MESSAGE HAS BEEN STACKED; PRINT IT 

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE (I.E. CKLOOP)> 

N$: RESUMPTION OF NORMAL PROCESSING 



004306 
004324 

003722 



002402 
003476 



STUREG: MOV 
MOV 



2$ 



4* 



002400 002402 



JSR 
.WORD 
.WORD 
BCS 

CLR 

JSR 

.WORD 

.WORD 

BCS 

CMPB 

CLC 

BEQ 
GTDF 



RO, 2i 
R0.4$ 

R5, WRITE 



TDATA 
101 

BDATA 

R5.READ 



BDATA 

101 

GDATA, BDATA 



10$ 
EM25.ERR7A 



{PUT SPECIFIED REGISTER'S ADDRESS IN I/O CALLS 



iWRITF. IT 

;*♦* MODIFIED FROM ABOVE ♦*♦ 



{ON ERROR. EXIT 



JUST IN CASE. .. . 



000001 
000005 
013366 
017252 



002246 
002250 
002252 

002254 



10$: 



SEC 
RTS 



PC 



.CLEAR BOTH BYTES - 
jREAD IT BACK AGAIN 
;*♦* MODIFIED FROM ABOVE *** 

jON ERROR. EXIT 

;DID WE READ WHAT WE WROTE? 

i (THIS ISN'T NEEDED FOR THE ERROR TEST BUT 

; MUST BE CLEARED ON EXIT IF NO ERROR OCCURED) 

jYES. EXIT FROM SUBTEST 

{REPORT READ/WRITE ERROR 

j QUEUE "DEVICE FATAL" ERROR * 5 

MOV 
MOV 
MOV 
MOV 

{INDICATE THAT AN ERROR WAS DETECTED 



0T.EDF .ERRTYP 
*5 , ERRNBR 
OEM25.ERRMSG 
0ERR7A.ERRBLK 



.SBTTL STALL - OELAY FOR 10.5 MICRO-SEC S (ON LSI-11) 

j STALL -- THIS SUBROUTINE STALLS FOR ABOUT 10.5 MICRO - SECONOS 

. - - *********^*4,^******4 i + 4^4 k 4 t 4 + 4.4 i * + *,*,4 t 4* + + * + * + * + *4.^ + * + + + + + + + + + + + + + + + + 4 + + + + ++ + + + 



004400 000207 



STALL: RTS 



PC 



CNDMCAO DMV11 LINE UN11 DIAGl MACRO M1200 22 FEB -84 15:31 PAGE 34 



5EQ 0061 



2795 
2796 
279? 
2798 
2799 
2800 
2801 
2<?02 
2803 
2804 
2805 
2806 
2807 
2808 
2809 
2810 
2811 
2812 
2813 
2814 
2815 
2816 
2817 
2818 
2819 
2820 
2821 
2822 
2823 
2824 
2825 
2826 
2827 
2828 
2829 
2830 
2831 
2832 
2833 
2834 
2835 
?836 
2837 
2838 
2839 
2840 
2841 
2842 
2843 
2844 
2845 



004402 
004410 

0O4416 
004422 
004426 
004430 

004432 
004436 
004442 
004444 

004446 
004452 
004460 

004462 
004470 
004476 



OO4502 
004510 
004516 
0O4522 
004526 
004530 
0O4532 
004536 
004544 
004352 
004554 



012737 
012737 

005037 
004537 
122000 
002334 

005077 
004537 
000000 
000000 

005237 
023727 
001772 

062737 
023727 
00135L 



004500 000207 



012737 
012737 
005077 
0O4537 
000000 
000000 
005237 
062737 
023 727 
001361 
000207 



002316 
120400 

002334 

003476 



000006 
003476 



004442 

004442 



000002 

004442 



004444 
004442 



.SBTTL 

l *-+. + +.* + + + + *+. + ** + 4. + + * + + * + + +.+* + ** + + * + + + + + + + * + + * + ****** + + + + + + + + tmmmmmn 

j* GETURS - LOAD INTO THE 8 UORD STORAGE AREA (UREGS) THE CONTENTS OF THE 

;♦ VARIOUS USYRT REGISTERS 

}♦ 

;* CALLING SEQUENCE: 

;* 



GETURS: MOV 
MOV 



120406 



004444 
120410 



3$: 

4i: 
5$: 

6$: 



CLR 
JSR 
.WORD 
.UORD 

CLR 
JSR 
.WORD 
.WORD 

INC 
CMP 
BEQ 

ADD 
CMP 
BNE 

RTS 



0UREGS.5* 
0USYRT.4S 

UREGS*14. 
R5.READ 
USTATR 
UREGS+14, 

S5« 

R5.READ 





4$ 

4I.0USYRT v6 
6$ 

02,5$ 

4$,*USYRT*10 
It 

PC 



jINIT POINTER TO REG STORAGE TABLE 
ilNIT POINTER TO REGISTER ADDRESSES 

j CLEAR STORAGE WORD 

jREAD THE USYRT STATUS REGISTER 

jSTATUS REGISTER'S ADDRESS WITHIN DMV-11 

{ADDRESS ALLOCATED TO THAT REG. W/IN "UREGS 

j CLEAR STORAGE WORD 

jREAD A LINE UNIT REG 

iREGISTER ADDRESS GOES HERE 

, STORAGE ADRS IN TABLE GOES HERE 

{INCREMENT REG NO. 

;THIS IS NOT A VALID REGISTER ADDRESS 

j SO IT MUST BE BYPASSED 

;ADVANCE ADDRESS OF STORAGE AREA POINTER 
{SEE IF ALL REGS READ YET 
{BR IF NOT 

{RETURN 



{* GETVRS: - LOAD INTO THE 16 

i« VARIOUS VIA REGISTERS 

!• 

!♦ CALLING SEQUENCE : 



WORD STORAGE AREA (VREGS) THE CONTENTS OF THE 



002336 
120000 
000006 
0C3476 



C04526 
000002 

004526 



004530 
004526 



{ 



»*** 



GETVRS; MOV 
MOV 



004530 
120020 



31 

41 

5$ 

6* 



CLR 
JSR 
.WORD 
.WORD 

INC 
ADO 
CMP 
BNE 
RTS 



*VREGS.5> 

0VIA.4* 

85$ 

R5.READ 





4$ 

02,51 

4$.0VXAa6. 
3$ 

PC 



{INIT POINTER TO REG STORAGE TABLE 

;INIT POINTER TO REGISTER AODRESSES 

{CLEAR STORAGE WORD 

{READ A VIA REG 

{REGISTER ADORESS GOES HERE 

{STORAGE AORS IN TABLE GOES HERE 

i INCREMENT REG HO. 

{INCREMENT STORAGE ADRS 

jSEE IF ALL VIA REGS READ YET 

i BR IF NOT 

{RETURN 



i/ f 
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INITT1 -- INITIALIZE TIMER i>\ 



SEQ 006? 



264? 
2848 
2849 
2850 
2851 
2852 
2853 
2854 
2855 
2856 
285? 
2858 
2859 
2860 
2861 
2862 
2563 
2864 
2865 
2866 
2867 
2368 
2869 
2870 
2871 
2872 
2873 
28/4 
2875 
2876 
2877 
2878 
2879 
2880 
2881 
2882 
2883 
2884 
2885 
2886 
2887 
2888 
2889 
2890 
2891 
2892 
2893 
2894 
2895 
2896 
2897 
2898 
2899 
2900 
2901 
2902 
2903 



004556 
004560 
0O4564 
004570 
004572 
0O4576 
004602 

004604 
004606 



004610 
004614 
004620 

004624 
0O4630 
0O4632 

004634 
004640 
004642 

004644 
004650 
004654 
004660 



143701 
153701 
010137 

004537 
120016 
000000 

004537 
120013 
OOOOOO 

013701 
143701 
053701 
010137 



SB 
*♦ 

* 

* 
4 

4 

4 
♦ 
* 

+ 

4 
4 

4 

;* 
i* 
;* 
{* 
;♦ 
;* 
}♦ 
;* 

,44 



TTl INITT1 INITIALIZE TIMER #1 

444444444444444444444444444444444444444444444444444444444444444444444444444 



INITT1 



INITIALIZE TIMER 1 
CALLING SEQUENCE: 



JSR 
.WORD 

.WORD 
.BYTE 



.BYTE 



R5.INITT1 

<VALUE LOADED INTO THE Tl LATCH S VIATIC 6 VIAUD> 

<VALUfc LOADED INTO "TILL" C "TIC H"> 

<BITS 6 6 7 WILL BE LOADED INTO "ACR", BIT 5 WILL BE 

USED TO SET OR CLEAR BIT 6 ("Tl") OF THE INTERRUPT 

ENABLE REGISTER ("IER")> 
< UNUSED > 



NOTE 



BEFORE LOADING ANO STARTING THE COUNTER, THE LATCH REGISTER (ACCESSED THRU 
"VIATIC") IS LOADED. THEN, TlL-L IS LOADED ANO NEXT, T1C-H. THIS LAST 
LOAD WILL RESET THE. TIMEOUT BIT AND COUNTER LOGIC. IT IS EXPECTED AT THIS 
TIME (5/25/79) THAT THE INTERRUPT FACILITY OF THE VIA CHIP WILL NOT BE USED 

- HOWEVER, ACCESS TO THE INTERRUPT ENABLE BIT IS GIVEN THROUGH THE THIRD 
PARAMETER IN THE CALLING SEQUENCE (BIT 5 - WILL CAUSE THIS ROUTINE TO 
CLEAR THE ENABLE BIT ("Tl") IN "IER".) 



444444444*444444444444444444444*444444*4444*4444*4*4444444444444444*4444444 



010146 

012537 OO4702 

012537 004730 

111501 

143701 000077 

010137 004672 

112501 

106301 
106301 



INITT1: MOV 
MOV 
MOV 
MOVB 
BICB 
MOV 
MOVB 

ASLB 
ASL8 



000177 
000100 
004632 

003734 



003610 



004642 
000300 
004672 
004672 



2$: 



3*; 



Rl.-(SP) 
CR5)».7» 

(R5)*,10* 
(R5),R1 
077, Rl 
R1.4I 
(R5)f t Rl 

Rl 
Rl 



BICB 
BISB 

MOV 


177, Rl 
100, Rl 
R1.2* 


JSR 

VIAIER 
.WORD 


R5.WRITEI 




JSR 

VIAACR 

.WORD 


R5.READI 



MOV 

BIC8 

BIS 

MOV 


31. Rl 
300, Rl 
41, Rl 
R1.4* 



j SAVE THE REGISTER WE WILL BE USING 

{SETUP VALUE TO BE WRITTEN IN LATCH 

SETUP VALUE TO 8E WRITTEN IN COUNTER 

GET 6 PROCESS BITS FOR ACR 6 6 7 

SETUP CALL SET ACR S BITS 6 C 7 

NOW, GET THE BIT TO BE USED IN SETTING OR 

CLEARING BIT 6 OF "IER" 

THE PASSEO BIT IS IN THE WRONG POSITION 

BUT, THE PASSED BIT SHOULD CONTROL THE OPERATION 

WE KNOW WE ARE SETTING OR CLEARING BIT 6 - - 

THUS, THE PASSED BIT WILL BECOME THE CONTROLLING 

BIT 7 ANO WE WILL "OR" IN THE BIT WE WISH TO 

BE CONTROLLED (BIT 6). 

FIRST, MAKE SURE ALL UNWANTED BITS ARE CLEARED 

THEN SET BIT 6 

THE CALL WILL NOW WRITE THE APPROPRIATE VAL'JE 

WRITE TO 

THE VIA' S IER 

INTERRUPT ENABLE/DISABLE INFORMATION 

READ THE CURRENT SETTING OF 
THE VIA'S ACR 
INTO "3*" 

GET THAT VALUE 

CLEAR THE CURRENT SETTING OF BITS 6 6 7 

SET THEM ACCORDING TO JHt PASSED VALUES 

;PASS THE NEW REG. SETTING TO APPROPRIATE CALL 
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INITT1 -- INITIALIZE TIMER *l 



SEQ 0063 



!904 



2905 


004664 


004537 


003734 


2906 


004670 


120013 




2907 


004672 


000000 




2908 








2909 


0046 74 


004537 


003734 


2910 


004 700 


120006 




2911 


004 702 


000000 




2912 








2913 


004704 


113737 


004 703 


2914 


004712 


004537 


003 734 


2915 


004716 


120007 




2916 


004720 


000000 




2917 








2918 


004 722 


004537 


003734 


2919 


004 726 


120004 




2920 


004730 


OOCOOO 




2921 








2922 


004732 


113737 


004751 


2923 


004740 


004537 


003734 


2924 


004 744 


120005 




2925 


004746 


000000 




2926 








2927 








2928 








2929 


004 750 


012601 




2930 


004752 


005205 




2931 








2932 








2933 


004754 


000205 




2934 








2935 









004720 



4$ 



7$ 



8$ 



10$ 



004746 



11* 



JSR 

VIAACR 

.WORD 

JSR 

VIATIC 
.WORD 

MOVB 
JSR 

VIAT1D 
.WORD 

JSR 
VIAT1A 

.WORD 

MOVB 
JSR 

VIAT1B 
.WORD 



RisWRITfcl 


R5.WRITEI 


7$»1.8$ 

R5.WRITEI 



R5.WR1TEI 



10*»1,H* 
R5.WRITLI 





{WRTTfc TO 

{THE VIA'S ACR 

{THE NEW REGISTER SETTING 

jWRITF TO 

{LOW ORDER LATCH REGISTER (TH.-L) 
j THE. VALUE PASSED 

j SETUP FOR AND 

-.WRITE TO 

jHIGH ORDER LATCH REGESTER CT1L-H) 

{THE VALUE PASSED 

iWRITE TO 

{LOW ORDER LATCH 6 COUNTER (T1L-L 6 T1C-L) 

{THE VALUE PASSED 

{SETIP ruR AND 

{WRITE TO 

jHIGH ORDER COLNTER CT1C-H) <ALSO STARTS CTR> 

{THE VALUE PASSED 



DON'T WAIT AROUND FOR ANYTHING TO HAPPEN -- JUST RETURN! 



MOV 
INC 



RTS 



(SP)»,R1 
R5 



R5 



{BUT FIRST RESTORE Rl 

{ ANO PUT R5 BACK ON A WORD BOUNDRY (THE LAST 

{PASSED PARAM. WAS A BYTE, NOT A WORD!) 

{NOW, RETURN 



MS 
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. ...INITT2 -- INITIALIZE TIMER 42 



SEQ 0064 



29 S? 

2958 
2939 
2940 
2941 
294? 
2943 
2944 
2945 
2946 
294 7 
2948 
2949 
2950 
2951 
2952 
2953 
2954 
2955 
2956 
2957 
2958 
2959 
2960 
2961 
2962 
2963 
2964 
2965 
2966 
2967 
2968 
2969 
2970 
2971 
2972 
2973 
2974 
2975 
2976 
2977 
2978 
2979 
2980 
2981 
2982 
2983 
2984 
2985 
2986 
2987 
2988 
2989 
2990 
2991 
2992 
2993 



004 756 
004760 
004 764 
004766 
004 772 
004776 

005000 
005002 
005004 



005006 
005012 
005016 

005022 
005026 
005030 

005032 
005036 
005040 

005042 
005046 
005052 
005056 



143701 
153701 
010137 

004537 
120016 
000000 

004537 
120013 
000000 

013701 
143701 
053701 
010137 



SB 
** 

* 

+ 

♦ 
4 
* 
* 
+ 
4 

4 

* 

* 

+ 

4 
* 

4 
* 
44 



TTl. INITT2 -■■ INITIALIZE TIMER 02 

************************* ************************* 4************4***4*****44 
INITT2 - INITIALIZE TIMER # 2 

CALLING SEQUENCE: 

JSR R5.INITT2 

.WORD <VALUE LOADED INTO "T2L-L" £ "T2C-H"> 

.BYTE <£TT 5 WILL BE LOADED INTO "ACR". BIT 4 WILL BE USED 

TO SET OR CLEAR BIT 5 ("T2") OF THE INTERRUPT ENABLE 

REGISTER ("IER")> 
.BYTE <UNUSED> 

NOTE: 

FIRST T2L-L IS LOADED. THEN T2C-H. THIS SECOND LOAD WILL RESET THE TIMEOUT 
BIT AND COUNTER LOGIC. IT IS EXPECTED AT THIS TIME (5/25/79) THAT THE 
INTERRUPT FACILITY OF THE VIA CHIP WILL NOT BE USEO -- HOWEVER, ACCESS TO 
THE INTERRUPT ENABLE BIT IS GIVEN THROUGH THE SECOND PARAMETER IN THE. 
CALLING SEQUENCE (BIT 4 - WILL CAUSE THIS ROUTINE TO CLEAR THE ENABLE BIT 
C"T2") IN "IER".) 

************************************* ********** 4**********A**********A***** 



010146 

012537 005100 

111501 

143701 000337 

010137 005070 

112501 

106301 
1^6301 
1 6301 



INITT2: MOV 
MOV 
MOVB 
BICB 
MOV 
MUVB 

ASLB 
ASL8 
ASLB 



000177 
000040 
005030 

003734 



003610 



005040 
000040 

005070 
005070 



2$: 



3$: 



Rl.-CSP) 

(R5)»,10$ 
(R5).R1 
337. Rl 
R1.4I 
CR5)*,R1 

Rl 
Rl 
Rl 



005062 004537 003734 



BICB 
BISB 
MOV 


177. Rl 
040. Rl 
R1.2S 


JSR 

VIAIER 

.WORD 


R5.WRITEI 




JSR 

VIAACR 

.WORD 


R5.READI 



MOV 
BICB 
BIS 
MOV 


3$.R1 
040. Rl 
4$.R1 
R1.4S 


JSR 


R5.WRITEI 



;SAVE THE REGISTER WE WILL BE USING 
i SETUP VALUE TO BE WRITTEN IN COUNTER 
; GET £ PROCESS BI" FOR ACR 5 

i SETUP CALL TO SET OR CLEAR ACR'S BIT 5 

;NOW, GET THE BIT TO BE USED IN SETTING OR 

j CLEARING BIT 5 OF "IER** 

{THE PASSED BIT IS IN THE WRONG POSITION 

;BUT, THE PASSED BIT SHOULO CONTROL THE 

{OPERATION. 

,WE KNOW WE ARE SETTING OR CLEARING BIT 5 -- 

{THUS, THE PASSED BIT WILL 3EC0ME THE CONTROLLING 

{BIT 7 AND WE WILL "OR" IN THE BIT WE WISH TO 

:BE CONTROLLED (BIT 5). 

{FIRST. MAKE SURE ALL UNWANTED BITS ARE CLEARED 

{THEN SET BIT 5 

{THE CALL WILL NOW WRITE THE APPROPRIATE VALUE 

{WRITE TO 

, "ff-|£ VIA' S IER 

I INTERRUPT ENABLE/DISABLE INFORMATION 

,READ THE CURRENT SETTING OF 
;THE VIA'S ACR 

{INTO ••;*$•• 

{GET THAT VALUE 

{CLEAR THE CURRENT SETTING OF BIT 5 

;SET IT ACCORDING TO THE PASSED VALUE 

{PASS NEW REG. SETTING TO APPROPRIATE CALL 

jWRITE TO 
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INITT2 



INITIALIZE. TIMLR #2 



2994 
2995 
2996 
2997 
2998 
2999 
30OC 
3001 
3002 
3003 
3004 
3005 
3006 
300 f 
3006 
3009 
3010 
3011 
3012 
3013 



005066 120013 

005070 000000 

005072 004537 003734 

005076 120010 

005100 000000 



4$ 



10$ 



005102 113737 005101 005116 

005110 004537 003734 

005114 120011 

005116 000000 11$ 



rF.B-84 15:31 PAGE 36 1 



VIAACR 
.WORD 

JSR 

VIAT2A 

.WORD 

MOVB 
JSR 

VIAT2B 
.WORD 





R5.WRITEI 



10W1.U* 
R5.WRTTEI 





SEQ 0065 



{THE VIA'S ACR 

j THE NEW REGISTER SETTING 

i WRITE TO 

jLOW ORDER LATCH £ COUNTER CT2L-L 6 T2C-L) 

{THE VALUE PASSED 

} SETUP FOR AND 

:WRITE TO 

} HIGH ORDER COUNTER (T2C-H) <ALSO STARTS CTR> 

;THE VALUE PASSED 



005120 012601 
005122 005205 



005124 000205 



j DON'T WAIT AROUND FOR ANYTHING TO HAPPEN -- JUST (JEST) RETURN! 



MOV 

INC 



RTS 



(SP)+,R1 

R5 



R5 



{BUT FIRST RESTORE Rl 

;AND PUT R5 BACK ON A WORD BOUNDRY (THE LAST 

{PASSED PARAM. WAS A BYTE, NOT A WORD!) 

;THEN RETURN 



I 1 .'. 
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.... RSTCHK -- RESET USYRT 'VFR1FY At. I USYRT REGS g RESET STATE 



5EQ 0066 



sois 

3016 

so i: 

301ft 
301^ 
3020 
30.U 

;vw 

3023 
3024 
3025 
3026 
302 7 
3028 
3029 
3030 
3031 
3032 
3033 
3034 
3035 
3036 
3037 
3038 
3039 
3040 
3041 
3042 
3043 
3044 
3045 
3046 
304 7 
3048 
3049 
3050 
5051 



3052 
3053 
3054 
3055 
3056 
3057 
3058 
3059 
3060 
5061 
30<b2 
3063 



005126 
005126 
005130 

005132 
005136 
005140 
005142 
005146 
005150 

005152 
005154 
005160 
005166 
005172 
005174 
005176 
005202 

005204 
0O5210 
005214 
005220 
005226 

005234 

005234 
005242 
005250 
005256 
005264 
005266 

0052 70 
005274 
005300 
0O5302 

005304 
005306 
005310 



010146 
010246 

00453/ 
120OO0 
00C031 
004537 
120000 
000030 

005001 
012702 
016137 
004537 
000000 
OOOOOO 
123722 
001432 

010137 
006237 
00503 7 
116237 

013737 



012737 
012737 
012737 
012737 
000261 
00O406 

062701 

020127 
002727 
000241 
012602 
012601 
000^05 



003 734 



003734 



002662 
002552 

003610 



005174 



002412 
002412 

002400 
17777/ 
005174 



000001 
000006 
013142 
017372 



00O002 
0000^0 



';rtt 



.RSTCMK 



RFSFT U5YRT/VFRIM At I USYRT REGS M RESLI S I A T F 



RSTCHK - MANUALLY RESET THE USYRT ANO VERIFY THAT ALL US'RT Rt GISTf RS 
ARL IN THEIR RESET STATE. AN ERROR MESSAGE IDENUFflNG THE 
FAILING REGISTER IS STACKED IF ONE IS ENCOUNTERED. 

CAl.l ING SEQUENCE: 

JSR R5, RSTCHK 



RSTCHK: 



005172 



6lt 

71: 
8$s 



002400 
002402 



002246 
002250 
002252 
002254 



iSTACK 



91: 



101; 



MOV 
MOV 



Rl, -(SP> 
R2 ( (SP) 

H5, WRITE! 



JSR 

VlAORB 

DTRJRTSNDJPRESET 

JSR R5 t WRITET 

VIAORB 

DTR1RTSN0 



CLR 

MOV 

MOV 

JSR 

.WORD 

,WOR0 

CMPfl 

BEQ 

MOV 
ASR 

CLR 
MOVB 
MOV 
"USYRT 
GTDF 



Rl 

♦PATF.K2 

USYREG(R1).7I 

R5.READI 





81, (R2)* 

9t 

Rl.REGNUM 
REGNUH 

GOAT* 

-1(R2),G0ATA 
8I.BDATA 
NOT CLEARED BY 
EM2.ERR10 



I SAVE Rl 
I SAVE R2 

I SET PROGRAM RESET HIT IN VIA ORB REG 



I CLEAR PROGRAM RESET BIT IN VIA ORB REG 



jINIT USYRT REG AORS PTR 

jINIT DATA PATTERN POINTER 

i SET USYRT REAO AOORESS 

iREAO A USYRT REG 

, USYRT REG AORS GOES HERE 

iDATA READ IS RETURNED HERE 

iSEE IF REG CONTAINS EXPECTED DATA 

jBR IF MATCH 



ISET 

iGtT 
iGET 

.GET 
PROGRAM 



USYRT REG NO. 
WORO OFT SET 
EXPECTED DATA 



►'OR PRINTOUT 



ACTUAL 
RESET" 



DATA 
MSG 



QUEUE "DEVICE FATAL 



SEC 
BR 



10» 



i SET C BIT TO Fi AG ERROR 
l TAKE ERROR EXIT 



ERROR ♦ 6 




MOV 


♦t.eof.errtyp 


MOV 


♦6.ERRWR 


MOV 


♦EM2.ERRMS', 


MOV 


*ERR10»EHRULK 



ADO 


«2.R1 


CMP 


R1.916. 


BLT 


6t 


CLC 




MOV 


(SP)».R2 


MOV 


(SP)» t Rl 


RTi 


H^ 



ilNCR USYRT 
i SEE IF ALL 
,BR IF NOT 
j** CLEAR C 
iRESTORE R2 
l RE5T0RE Rl 
1** RETURN 



REG AORS PTR 
REGS READ YET 

BIT FOR NO ERRORS 
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RSTCHK ■• RESET USYRT'VERm Alt USyRI RUGS fi RESET STATE 



SEC) 006/ 



3065 
306t> 

306.' 
3068 
3069 
3070 
30 .'1 
307? 
30/3 
3074 
3075 
3076 
30 / / 
30/8 
3079 
3080 
3081 
308? 
3083 
3084 
3085 
3086 
3087 
3083 
3089 
3090 
3091 
309? 
3093 
3094 
3095 
3096 
3097 
3098 
3099 
3100 
3101 
3102 
3103 
3104 
3105 
3\06 
3107 
3108 
3109 
3110 
3111 
311? 
3115 
3114 
311b 



OC5312 
005314 
005*20 
0053?? 
005324 



005326 
005326 
005332 
005334 
005336 
005342 
005344 
005346 
005352 
005354 
005356 
005362 
005364 
005366 
00537? 
005374 
005376 
005402 
005404 
005406 
00541? 
OOS414 
005416 



010146 
012701 
077101 
012601 
000207 



004537 
120O02 
000377 
004537 
12OO03 
000001 
004537 
120017 
000000 
0O4537 
12OOO0 
000030 
004537 
120013 
000350 
004537 
120014 
0OOO22 
004537 
120016 
000177 
000207 



{♦ WAIT50 THIS SUBROUTINE STAl l.S FOR AT I. FAST 50 MTCRO StC. AND THf N Rf TijPNS 



000005 



WATTSOj 


MOV 


Rl, (SP) 


iSAVE Rl 




MOV 


#5, ,R1 


|INI T COUNTER 


3$: 


soe 


R1.3I 


jDI.LAy HERE FOR 23.8 MICRO-SEC' b 




MOV 


(5P)*,R1 


i RE STORE Rl 




RTS 


PC 


(RETURN 



OVERHEAD (JSR, MOV, MOV, MOV, 6 RTS) ADO UP TO 25.25 MICRO SECT, 
THEREFORE, ACTUAL TUTAL DELAY IS 49.35 MICRO-SECONOS 



.5BTTL SETVIA 



SET UP VIA REGISTERS 



♦ SETVIA - SET UP THE VIA REGISTERS 

* 

♦ THIS SUBROUTINE PROGRAMS THE VIA REGISTERS FOR NORMAL OPERATION. BY 

♦ LOADING THE DDRB, DDRA, ORB, ACR, PCR, IER . 

* 

♦ CALLING SEQUENCE ; 

♦ JSR PC, SETVIA 



003734 
003734 
003734 
003734 
003734 
003734 
003734 



SETVIA- 



JSH 


R5, 


WRITEI 


VI^OPB 






377 






JSR 


R5 


WRITEI 


VIAOPA 






001 






JSR 


R5 


WRITEI 


VIAORA 






000 






JSR 


R5 


WRITEI 


VIAORS 






DTR.'RTSNO 




JSR 


R5 


WRITEI 


VIAACR 






350 






JSR 


R5 


WRITEI 


VIAPCR 






022 






JSR 


R5 


wftirti 


VlAIfcR 






177 






RTS 


PC 





,4* 



I SET PORT B FOR OUTPUT MODE 



I SET PORT A FOR INPUT MOOE 
j CBITO IS ONLY OUTPUT BIT") 

(DISABLE USYRT INTERNAL LOOPBACK 



iINIT PORT B 



I SET ACS EQR 



i SET PCR FOR 



j DISABLE ALL MICRQ-INTRPTS 



iRETURN 



Tl SQUARE WMVE OUTPUT MOOE . 
T2 ONE -SHOT OUTPUT MOOE, 
SR AT SYS CLOCK RATE ON CBX 
CB1 NEG TRANS INPUT MOOE, 
CA2 NEG TRANS INPUT MOOE. 
CA1 NEG TRANS INPUT MOOt 



[)', 
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».,. INIDMV - INIT DMV IMCLR, VIA SETUP) 



SEQ OOhH 



311 ; 

3118 
3119 
3120 
3121 
3122 
3123 
3124 
3125 
3126 
3127 
3128 
3129 
3130 
3131 
3132 
3133 
3134 
3135 
3136 
3137 
3138 
3139 
3140 
3141 
3142 
3143 
3144 
3145 
3146 
3147 
3148 
3149 
3150 
3151 
3152 



005420 
005424 
005430 



00543? 
005432 
005436 
005440 
005442 
005446 
0O5450 
005452 
005460 
005466 
005472 

005500 



005500 
0O5506 
005514 
005522 

3153 005530 

3154 005532 

3155 005534 
3156 

3157 
3158 
3159 



004 737 
004737 
000207 



0O4537 
122000 
OOOOOO 
122537 
000241 
001430 
012737 
016537 
005037 
113737 



012737 
012737 
012737 
012737 
000261 
005205 
000205 



0033 74 
005326 



SBTTL 



INIDMV 



INIT DMV CMCLR, VIA SETUP) 



♦ INIDMV - THIS SL6R0UTINE INITIALIZE. 5 THE DMV • 1 1 , Br DOING A MASTER CLEAR, 

♦ ENTERING THE M-LOOP, AND PROGRAMMING THE. VIA REGS FOR DEFA'JLT 

♦ OPERATION. 

* 

♦ CALL ISO SEQUENCE : 

♦ JSR PC, INIDMV 

*******#* + ** + ****••♦♦*************♦<. •♦***♦♦*♦♦**••****** + ******♦ + **♦•* + *♦**** 
INIDMV: JSR PC.MSTCl.R j MASTER CLR. M-LOOP 

JSR PC.SETVIA | PROGRAM VIA 

RTS PC jRETURN 



.SBTTL 



.CKUSTS ~- CHECK USYRT STATUS REGISTERS 



i 



003610 



005440 



000007 

177777 
002402 
005440 



000001 
000007 

013760 
017372 



j* CKUSTS - THIS SUBROUTINE CHECKS THE USYRT STATUS BY READING THE USYRT 

»♦ STATUS REGISTER AND COMPARING IT 10 THE LOW BYTE OF THE WORD FOLLOWING 

$♦ THE CALL. IF ThfRE IS A MISMATCH, THE SUBROUTINE STACKS THE ERROR 

}♦ INFORMATION, AM SETS THE "C M BIT ANO RETURNS. 

j****** **************** »*************.*#****#*^*^**************####**#«i *#*###*■* 

CKUSTS: 

iREAD USYRT STATUS REGISTER 



1$ 



002412 
002400 

002402 



002246 
002250 
002252 
002254 



jSTACK 



JSR 


R5.READI 


USTATR 




.WORD 





CMPB 


(R5)».l$ 


CLC 




BEQ 


2* 


MOV 


#7,REGNUM 


MOV 


-1(R5),G0ATA 


CLR 


BOATA 


MOVB 


ll.BDATA 


'USYRT 


STATUS INCORRECT 


GTDF 


EM68.ERR10 



2% 



SEC 
INC 
RTS 



R5 
Rb 



i SEE IF STATUS MATCHES EXPECTED 

»CLEAR C BIT 

,Bi< IF STATUS OK 

tSET USYRT REG NO. FOR PRINTOUT 

jGET EXPECTED DATA 

tGET ACTUAL DATA 



ERROR 



QUEUE "DEVICE FATAL 



f SET C BIT 
, INCREMENT 
jRETURN 



FOR ERROR 

R5 PAST ARGUMENT 



ERROR 7 




MOV 


•T.EDr .ERRTYP 


MOV 


♦7,ERRNP^ 


MOV 


*EM68,rRRMSG 


MOV 


0ERR10.ERRBLK 



[>, 
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....CKTACT -- CHECK TRANSMITTER ACTIVE (TXACT) 



SEQ 0069 



3161 
3162 

3163 










.SBTTL 


CKTACT -- CHECK 


TRANSMITTER ACTIVE (TXACT) 
















i* CKTACT - THIS SUBROUTINE 


CHECKS FOR THE PROPER STATE Of 


TXACT IN 


THE 


USYPT 


3164 










; * 


STATUS 


REGISTER, ANO REPORTS AN ERROR IF IT IS NOT 


PROPERLr 


SET 


TO THE 


3165 










I * 


STATE 


OF BIT IN THE WORD FOLLOWING THE CALL. 








3166 










; * 














3167 










; * 


CALLING SEQUENCE : 










3168 










i * 


JSR 


R5, CKTACT 










3169 










; * 


.WORD 


<8IT IS EXPECTFD VALUE OF TXACT > 








3170 










;U*********t******i*«*********|**A*****4t******tiUt**************t********* + 


3171 


005536 








CKTACT s 














3172 


005536 


012737 


000007 


002412 




MOV 


«7.REGNUM 


j SET REG NO. FOR POSSIBLE ERROR REPORT 




3173 


005544 


004537 


003610 






JSR 


R5.REA0I 


jREAD USYRT STATUS 








3174 


005550 


122000 








USTATP 












3175 


005552 


000000 






1$: 


.WORD 













3176 


005554 


032725 


000001 






BIT 


*BIT0,CR5)» 


jGET EXPECTED STATE OF TXAC 








3177 


005560 


001422 








BEQ 


21 


,BR IF EXPECTED TXACT - 








3178 


005562 


132737 


000004 


005552 




BITB 


GTXACT.l* 


:SEE IF TXACT - 1 








3179 


005570 


001040 








BNE 


3$ 


jBR IF TXACT - 1 








3180 










i STACK 


"TXACT 


NOT SET" HSG 










3181 


005572 










GTDF 


EM69.ERR12 


i QUEUE "DEVICE FATAL 


" ERROR o 


8 






005572 


012737 


000001 


00c 246 










MOV 




OT.EDF.ERRTrP 




005600 


012737 


000010 


002 ?50 










MOV 




*8,ERRNBR 




005606 


012737 


014007 


002. 1 52 










MOV 




*EM69.ERRMSG 




005614 


012737 


017722 


002c 54 










MOV 




*ERR12,ERRBLK 


3182 


005622 


0O0261 








SEC 




t SET C BIT TO FLAG EWrtOR 








3183 


0O5624 


000423 








BR 


41 


, TAKE ERROR EXIT 








3184 


005626 


132737 


000004 


0055^2 


2$: 


BITB 


tTXACT.ll 


jSEE IF TXACT » 








3185 


005634 


001416 








BEQ 


3i 


,BR IF TXACT • 








3186 










i STACK 


"TXACT 


NOT CLEARED" 


MSG 








3187 


005636 










GTDF 


EM70.ERR12 


i QUEUE "DEVICE FATAL 


" ERROR * 


9 






005636 


012737 


000001 


002246 










MOV 




*T.EDF # ERRTfP 




005644 


012737 


000011 


002250 










MOV 




♦9.LRRNBR 




005652 


012737 


014025 


002252 










MOV 




0EM7O.ERRMSG 




005660 


012737 


017722 


002254 










MOV 




*€RR12,ERRBLK 


3188 


005666 


000261 








SEC 




jSET C BIT TO FLAG ERROR 








3189 


005670 


000401 








BR 


4$ 


jTAKE ERROR EXIT 








3190 


005672 


000241 






31: 


CLC 




» CLEAR C BIT FOR NO ERRORS 








3191 
3192 
3193 


005674 


000205 






4$: 


RTS 


R5 


jRETURN 






























3194 
























3195 

























[ t> 
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CKRACT -- CHECK RECEIVER ACTIVE (RXACT) 



SEQ OO/O 



3197 
31^8 
3199 
3200 
3201 
320? 
3203 
3204 
3205 
3206 
3207 
3208 
3209 
3210 
3211 
3212 
3213 
3214 
3215 
3216 
3217 



3218 
3219 
3220 
3221 
3222 
3223 



3224 
3225 
3226 
3227 
3228 
3229 
3230 
3231 



005676 
005676 
005704 
005710 
005712 
005714 
005720 
005722 
005730 

005732 

005732 
005740 
005746 
005754 
005762 
005764 
005766 
005774 

005776 

005776 
006004 
0O6012 
006020 
006026 
006030 
006032 
006034 



012737 
004537 
122000 
000000 
032725 
001422 
132737 
001040 



012737 
012737 
012737 
012737 
000261 
000423 
132737 
001416 



012737 
012737 
012737 
012737 
000261 
000401 
000241 
000205 



.SBTTL CKRAC1 



CHECK RECEIVER ACTIVE (RXACT) 



000007 
003610 



000001 
000040 



OOOOOt 
000012 

014047 

017722 



002412 



* CKRAC 

* 

♦ 
{* 
J* 

} ***** *4i 

CKRACTj 



T - THIS SUBROUTINE CHECKS FOR THE PROPER STATE OF RXACT IN THE USYRT 
STATUS REGISTER, ANO REPORTS AN ERROR IF IT IS NOT PROPERLY SET TO THE 
STATE OF BIT IN THE WORD FOLLOWING THE CALL. 

CALLING SEQUENCE : 
JSR R5 CKRACT 

.UORD <BIT IS EXPECTED VALUE OF RXACT> 

************************************************************* ***** ** + * 



005712 



002246 
002250 
002252 
002254 



MOV 
JSR 
USTATR 

1*: .WOW) 
BIT 
BEQ 
BITB 
BNE 

; STACK "RXACT 
GTOF 



07.REGNUM 
R5.READI 



0BIT0,(R5)* 
21 

♦RXACT, 1* 
3$ 
NOT SET" MSG 
EM71.ERR12 



0OOO40 005712 



SEC 

BR 4$ 

2\x BITB *RXACT,1$ 

BEQ 31 

i STACK "RXACT NOT CLEARED" 
GTDF EM72.ERR12 



MSG 



OOOOOl 
0O0013 

014065 
017722 



002246 
002250 
002252 
002254 



31: 
4$: 



SEC 
BR 

CLC 

rfs 



4$ 

R5 



jSET REG NO. FOR POSSIBLE ERROR REPORT 
jREAD USYRT STATUS 



jGET EXPECTED STATE OF RXACT 
»BR IF EXPECTED RXACT * 
iSEE IF RXACT - 1 
;BR IF RXACT - 1 



ERROR Q 
MOV 
MOV 
MOV 
MOV 



QUEUE "DEVICE FATAL 



j SET C BIT TO FLAG ERROR 
,TAKE ERROR EXIT 
;SEE IF RXACT - 
t BR IF RXACT » 



i QUEUE "DEVICE FATAL" ERROR * 

MOV 
MOV 
MOV 
MOV 

j SET C BIT TO FLAG ERROR 

j TAKE ERROR EXIT 

j CLEAR C BIT FOR NO ERRORS 

I RE TURN 



10 



M.EDF.ERRTYP 
*10,ERRNBR 
*EM71.ERRMSG 
SERR12.ERRBLK 



11 



OT.EOf .ERRTYP 
+11.ERRNBR 

*EM72.ERRMSG 
*ERR12.ERRBLK 



G>, 
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, ...CKTBMT -- CHECK TRANSMIT BUFFER EMPTY 



SEQ OO/l 



3233 
3234 
3235 
3236 
3237 
3238 
3239 
3240 
3241 
3242 
3243 
3244 
3245 
3246 
3247 
3248 
3249 
3250 
3251 
3252 
3253 



3254 
325S 
3256 
3257 
3258 
3259 



3260 
3261 
3262 
3263 
3264 
3265 
3266 
3267 



006036 
006036 
006044 
006050 
006052 
006054 
006060 
006062 
006070 

006072 

006072 
006100 
006106 
006114 
006122 
006124 
006126 
006134 

0O6136 

006136 
006144 
006152 
006160 
006166 
006170 
006172 
006174 



012737 
004537 
122000 

oooooo 

032/25 
001422 

132737 
001040 



012737 
012737 
012737 
012737 
000261 
000423 
132737 
001416 



012737 
012737 
012737 
012737 
000261 
000401 
0O0241 
000205 



000007 
003610 



000001 
000100 



OOOOOl 
000014 

014107 
017722 



002412 



SBTTL CKTBMT -- CHECK TRANSMIT BUFFER EMPTY 

♦ CKTBMT THIS SlEROUTINE CHECKS FOR THE PROPER STATE OF TBMT IN THE USfRT 

♦ STATUS REGISTER, AND REPORTS AN ERROR IF IT IS NOT PROPERLY SET TO THE 

* STATE OF BIT IN THE WORD FOLLOWING THE CALL, 

* CALLING SEQUENCE : 
j* JSR R5, CKTBMT 

;♦ .WORD <BIT IS EXPECTED VALUE OF TBMT> 

CKTBMT: 

jSET REG NO. FOR POSSIBLE ERROR REPORT 
{READ USYRT STATUS 



*7,REGNUM 
R5.READI 



006052 



002246 
O0225C 
002252 
002254 



MOV 

JSR 

USTATR 
1$: .WORD 

BIT 

BEQ 

BITB 

BNE 
; STACK "TBMT NOT SET" MSG 

GTDF EM73.ERR12 





*BIT0,(R5)* 

2$ 

*TBMT,1* 

3$ 



000100 006052 2\ 



SEC 




BR 


4$ 


BITB 


♦TBMT.lt 


BEQ 


31 



j STACK "TBMT NOT CLEARED" MSG 
GTDF EM74.ERR12 



OOOOOl 
000015 
014124 
017722 



002246 
002250 
002252 
002254 



31: 
4$j 



SEC 
BR 
CLC 
RTS 



4t 

R5 



ERROR Q 12 




MOV 


OT.EOF.ERRTYP 


MOV 


012.ERRNBR 


MOV 


♦EM73.ERRMSG 


MOV 


♦ERR12.ERRBLK 



jGET EXPECTED STATE OF TBMT 
jBR IF EXPECTED TBMT * 
{SEE IF TBMT - l 
jBR IF TBMT - 1 



QUEUE "DEVICE FATAL 



j SET C BIT TO FLAG ERROR 
j TAKE ERROR EXIT 
5 SEE IF TBMT - 
jBR IF TBMT - 



j QUEUE "DEVICE FATAL" ERROR 9 13 

MOV *T.EDF.ERRTYP 

MOV *13,ERRNBR 

MOV ♦EM74.ERRMSG 

MOV *£RR12.ERRBLK 

i SET C BIT TO FLAG ERROR 

tTAKE ERROR EXIT 

; CLEAR C BIT FOR NO ERRORS 

{RETURN 



*• I 



CNDMCAO I3MVU I INE UNIT OTAG1 MACRO M1200 
....CKRDA -- CHECK RECEIVE' DATA AVAILABLE 



22 FEB -84 1 r > i 3 1 PAGE 43 



SEQ 00/2 



3269 
3270 
32 71 
3272 
3273 
32 74 
3275 

32 76 
3277 
3276 
3279 
3260 
3281 
3282 
3283 
3284 
3285 
3286 
3287 
3288 
3289 



3290 
3291 
3292 
3293 
3294 
3295 



3296 
3297 
3298 
3299 
3300 
3301 
3302 
3303 



006176 
006176 
0O6204 
006210 
006212 
006214 
006220 
006222 
006230 

006232 

006232 
006240 
006246 
006254 
006262 
006264 
006266 
006274 

006276 

006276 
006304 
006312 
006320 
006326 
006330 
006332 
006334 



012737 
004537 
122000 
000000 
032725 
001422 
132737 
001040 



01^737 
012737 
012737 
012737 
000261 
000423 
132737 
001416 



012737 
012737 
012737 
012737 
000261 
000401 
000241 

000205 



000007 
003610 



000001 
000200 



000001 
000016 
014145 
017722 



002412 



SBTTL CKROA -- CHECK RECEIVE Oi'.TM AVAILABLE 

***********************+.** + ***************************«** ************* ****** 

CKRDA - THIS SUBROUTINE CHECKS FOR THE PROPER STATE OF RDA IN THE USfRT 

STATUS REGISTER, AND REPORTS AN ERROR IF IT IS NOT PROPERLY SET TO THE 
STATE OF BIT IN THE WORD FOLLOWING THE CALL, 

CALLING SEQUENCE : 

JSR R5, CKROA 

.WORD <BIT IS EXPECTED VALUE OF RDA> 

******** *********************************************************** ********* 

CKRDA s 

07.REGNUM ,SET REG NO. "■ R POSSIBLE ERROR REPORT 
R5.READI jREAO UfiYRT MATUS 



1$ 



006212 



002246 
002250 
002252 
002254 



MOV 

JSR 

USTATR 

.WORD 

BIT 

BEQ 

BIT6 

BNE 





freiT0.(R5)* 

2$ 

ORDA.li 

3$ 



{STACK "RDA NOT SET" MSG 



GTDF 



EM75.ERR12 



iGET EXPECTED STATE OF RDA 
jBR IF EXPECTED RDA - 
;SEE IF RDA - 1 
}BR IF RDA =■■ 1 



QUEUE "DLVICE FATAL" ERROR * 

MOV 



14 



000200 006212 2$ 



SEC 
BR 
BITB 
BEQ 



MOV 
MOV 
MOV 



At 

♦RDA.l* 
3$ 



j STACK "RDA NOT CLEARED" MSG 



GTDF 



EM76.ERR12 



000001 
000017 
014161 
017722 



002246 
002250 
002252 
002254 



jSET C BIT TO FLAG ERROR 
tTAKE ERROR EXIT 
;SEE IF RDA - 
I BR IF RDA ■ 



QUEUE "DEVICE FATAL" ERROR * 15 

MOV 



0T.EDF.ERRTVP 
014.ERRNBR 
♦EM75.ERRMSG 
0ERR12.ERRBLK 



3$: 
4*: 



SEC 
BR 
CLC 
RTS 



4$ 
R5 



jSET C BIT TO FLAG ERROR 

j TAKE ERROR EXIT 

; CLEAR C BIT FOR NO ERRORS 

{RETURN 



MOV 
MOV 
MOV 



0T.EDF.ERRTYP 
*15,ERRNBR 
*EM76.ERRMSG 
$ERRl2 f ERRBLK 
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....CKRSA -- CHECK RECEIVER STATUS AVAILABLE 



sea oo/5 



330b 
3306 
330/ 
3308 
3309 
3310 
3311 
3312 
3313 
3314 
3315 
3316 
3317 
3318 
3319 
3330 
3321 
3322 
3323 
3324 
3325 



3326 
3327 
3328 
3329 
3330 
3331 



3332 
3333 
3334 
3335 
3336 
3337 



006336 
006336 
006344 
006350 
006352 
006354 
006360 
006362 
0O6370 

006372 

006372 
00f400 
006406 
006414 
006422 
006424 
006426 
0O6434 

006436 

006436 
006444 
006452 
006460 
006466 
0064 70 
0064 72 
006474 



012737 
004537 
122000 
000000 
032725 
001422 
132737 
001040 



012737 
012737 
012737 
012737 
0O0261 
000423 
132737 
001416 



012737 
012737 
012737 
012737 
000261 
000401 
000241 
000205 



00000 7 
003610 



000001 
000020 



000001 
000020 
014201 
017722 



002412 



006352 



002246 
002250 
002252 
002254 



******* 
CKRSA: 

MOV 

JSR 

USTATR 
1$: .WORD 

BIT 

BEQ 

BITS 

BNE 
i STACK "RSA NOT 

GTDF 



i********************************«*****************************« 

\ - THIS SUBROUTINE CHECKS FOR THE PROPER STATE OF RSA IN THE US 
STATUS REGISTER, AND REPORTS AN ERROR IF IT is NOT PROPERLY SET 
STATE OF BIT IN THE WORD FOLLOWING THE CALL. 

CALLING SEQUENCE : 

JSR R5 CKRSA 

.WORD <BIT IS EXPECTED VALUE OF R:" \> 

a************************************************************** 



******* 

rRT 

TO THE 



******* 



47.REGNUM 
R5.READI 



06IT0,CR5)* 

2* 

*RSA,1* 
3$ 

SET" MSG 
EM77.ERR12 



000020 006352 



2$: 

j STACK " 



SEC 

BR 

BITB 

BEQ 

RSA NOT 
GTDF 



4$ 

*RSA t l$ 
3$ 

CLEARED" MSG 
EM78.ERR12 



000001 
0O0021 
014215 

017722 



002246 
002250 
002252 
002254 



3*: 

4*i 



SEC 
BR 
CLC 
RTS 



4$ 
R5 



} SET REG NO. FOR POSSIBLE ERROR REPORT 
jREAD USYRT STATUS 



;GET EXPECTED STATE OF USA 
jBR IF EXPECTED RSA - 
5 SEE IF RSA - 1 
;BR IF RSA - 1 



QUEUE 



{SET C BIT TO FLAG ERROR 
j TAKE ERROR EXIT 
;SEE IF RSA - 
»BR IF RSA - 



QUEUE 



j SET C BIT TO FLAG ERROR 
{TAKE ERROR EXIT 
;CLEAR C BIT FOR NO ERRORS 
i RETURN 



"DEVICE FATAL" 


ERROR 16 




MOV OT.EOF.ERRTrP 




MOV *16.ERRN6R 




MOV OEM7 7.ERRMSG 




MOV #ERR12.ERRBLK 



•DEVICE FATAL" 


ERROR 17 




MOV ST.EDF.LRRTYP 




MOV *17,ERRNBR 




MOV *EM78,ERRMSG 




MOV 4ERR12, fcRRBLK 
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CKROR -- CHECK RECEIVFR OVERRUN 



SEQ 00/4 



3339 
3340 
3341 
3342 
3343 
3344 
3345 
3346 
3347 
3348 
33-49 
3350 
3351 
3352 
3353 
3354 
3355 
3356 
3357 
3358 
3359 



3360 
3361 
3362 
3363 
3364 
3365 



3366 
3367 
3368 
3369 

3370 
3371 



006476 
0064 76 
006504 
006510 
006512 
006514 
006520 
006522 
006530 

006532 

006532 
006540 
006546 
006554 
006562 
006564 
006566 
006574 

006576 

006576 
006604 
006612 
006620 
006626 
006630 
006632 
006634 



012737 
004537 
120401 
000000 
032725 
001422 
132737 
001040 



012737 
012737 
012737 
012737 
0O0261 
000423 
132737 
001416 



012737 
012737 
012737 
012737 
000261 
000401 
000241 
000205 



.SBTTL CKROR 



CHECK RECEIVER OVERRUN 



; 4^**4^*4^******4^******4^*4>* + *4^4^****«********«**********«****************** 



* CKROR 

* USYRT RECEIVER STATUS REGISTER 



THIS SUBROUTINE CHECKS FOR THE OCCURANCE OF RFCEIVER OVERRUN IN THE 

(RDSRH), AND REPORTS AN fcMHOR IF IT IS 
OF BIT IN THE WORD FOLLOWING THE CALL. 



NOT PROPERLY SET TO THE STATE 



000001 
003610 



000001 
000010 



OOOOOl 
000022 
014235 

017722 



002412 



;♦ 

j* CALLING SEQUENCE : 

i* JSR R5, CKROR 

;* .WORD <BIT IS EXPECTED ^ALUE OF ROR> 

CKROR; 

41.REGNUM jSET REG NO. FOR POSSIBLE ERROR REPORT 

R5.READI jREAO RECEIVER STATUS 



006512 



002246 
002250 
002252 
002254 



1* 



{STACK 



MOV 
JSR 
RDSRH 
.WORD 
BIT 
BEQ 
BITB 
BNE 

"RECEIVER 
GTDF 



oeiTO,(R5)* 
2$ 

frflOR , 1 i 
3$ 

OVRN NOT SET 
EM90.ERR12 



jGET EXPECTED STATE OF ROR 
iBR IF EXPECTED ROR - 
j SEE IF ROR » 1 
jBR IF ROR • 1 

MSG 



I 



QUEUE 



000010 006512 



2i: 

j STACK 



SEC 
BR 

BITB 
BEQ 
"ROR NOT 
GTDF 



"DEVICE FATAL" 


ERROR 18 




MOV *T,EDF.ERRTYP 




MOV *18.ERRNBR 




MOV 4EM90.ERRMSG 




MOV 0ERR12,ERRBLK 



4$ 

♦POR.H 
31 

CLEARED" MSG 
EM91.ERR12 



OOOOOl 
000023 
014266 

017722 



002246 
002250 
002252 

003254 



3t 

4$ 



SEC 
BR 
CLC 
RTS 



4t 



R5 



iSET C BIT TO FLAG ERROR 
i TAKE ERROR EXIT 
j SEE IF ROR - 
jBR IF ROR - 



QUEUE "DEVICE FATAL 



jSET C BIT TO FLAG ERROR 

iTAKE ERROk EXIT 

;CLEAR C BIT FOR NO ERRORS 

;RETURN 



ERROR O 
MOV 
MOV 
MOV 
MOV 



19 



*T.EDF.ERRTYP 
019.ERRNBR 
♦EM91.ERRMSG 
3ERR12,ERRBLK 
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. ...CKSEOM -- CHECK RSOM, REOM 



3374 
337S 
3376 
3377 
3378 
3379 
3380 
3581 
3362 
3383 
3384 
3385 
3386 
3387 
3388 
3389 
3390 
3391 
3392 
3393 
3394 
3395 
3396 
3397 



iBTTL 



3398 
3399 

3400 
3401 
3402 
3403 



3404 
3405 
3406 
3407 
3408 
3409 
3410 
3411 



3412 
3413 
3414 
3415 



006636 
006636 
006644 
006650 
006652 
006654 
006660 
006662 
006670 

006672 

006672 
006700 
006706 
006714 
006722 
006724 
006726 
006734 

006736 

006736 
006744 
006752 
006760 
006766 
006770 
006772 
0O70OO 
007002 
007010 

007012 

007012 

007020 
007026 
007034 
007042 
007044 
007046 
007054 



012737 000007 

004537 003610 

12G401 

000000 

032725 000001 

001422 

132737 

001040 



012737 
012737 
012737 
012737 
000261 
000473 
132737 
001416 



012737 
012737 
012737 
012737 
000261 
000451 
032765 
001422 
132737 
001040 



012737 
012737 

012737 
012737 
000261 
000423 

132737 

001416 



000001 
000024 
013520 
017722 



000001 
000025 

013477 
017 722 



000002 
000002 



000001 
000026 
013556 

017722 



CI 



.CKSEOM 



CHECK RSOM, REOM 



CKSEOM - THIS SL«R0UTIN£ CHECKS FOR THE PROPER STATES OF RSOM. REOM IN THE 
USYRT RECEIVE* STATUS REG CRDSRH) AND REPORTS AN ERROR IF THEY ARE NOT 
PROPERLY SET TO THE STATES OF BITS 0,1 IN THE WORD FOLLOWING THE CALL. 
IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION 
IS STACKED, AND THE C-BIT SET. WHICH LEAVES THE ERROR REPORTING AT THE 
DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE. 

CALLING SEQUENCE : 
JSR R5, CKSEOM 
<BTT IS EXPECTED VALUE OF RSOM. BIT 1 IS VALUE OF REOM> 



002412 



* * * * * 
SEOMj 



<BM U ib LXrtLttU VHLUt UT KbUH, Oil 1 lb VMLUt Ur KtUn> 
**** + ** + *** + * •*>* + ♦* + + * + ******* + * + ♦* + *+*♦ + * + +* + * + + ♦♦ + ♦ + ♦ + * + ♦ + *** -t +***♦**♦ 



000001 006652 



l*s 



j STACK 



002246 
002250 
002252 
002254 



000001 006652 



2*; 

j STACK 



002246 
002250 
002252 
002254 



177776 
006652 



002246 
002250 
002252 
002254 



3$: 



{STACK 



MOV 


07.REGNUM 


JSR 


R5.REA0I 


RDSRH 




.WORD 





BIT 


#8IT0,(R5)+ 


BEQ 


2$ 


BITB 


0RS0M.lt 


BNE 


3t 


'RSOM NOT SET" MSG 


GTDF 


EM29.ERR12 



SEC 

BR 61 

BITB ♦PSOM.lt 

BEQ 3t 

"RSOM NOT CLEARED" MSG 
GTDF EM28.ERR12 



SEC 




BR 


6t 


BIT 


•6IT1.-2CR5) 


BEQ 


4t 


BITB 


OREOM.lt 


BNE 


5t 


"REOM 


NOT SET" MSG 


GTDF 


EM31.ERR12 



000002 006652 4t; 



SEC 
BR 
BITB 
BEQ 



6t 

OREOM.l* 

5* 



;SET REG NO. FOR P0SS1BI E ERROR REPORT 
{READ USYRT RECEIVFR STATUS 



;GET EXPECTED STATE OF RSOM 
;BR IF EXPECTED RSOM - 
jSEE IF RSOM - 1 
}BR IF RSOM - 1 



j QUEUE "DEVICE FATAL" ERROR * 20 

MOV 
MOV 
MOV 
MOV 

i SET C BIT TO FLAG ERROR 

{TAKE ERROR EXIT 

;SEE IF RSOM - 

iBR IF RSOM - 



j QUEUE "DEVICE FATAL" ERROR 21 

MOV 
MOV 
MOV 
MOV 

{SET C BIT TO FLAG ERROR 

{TAKE ERROR EXIT 

{GET EXPECTED STATE OF REOM 

{BR IF EXPECTED REOM - 

j SEE IF REOM - 1 

tBR IF REOM • 1 



i QUEUE "DEVICE FATAL" ERROR 22 

MOV 
MOV 
MOV 
MOV 

j SET C BIT TO FLAG ERROR 

{TAKE ERROR EXIT 

{SEE IF REOM - 

{BR IF REOM ■ 



♦T.EOF.ERRTfP 
♦20.ERRN8R 
♦EM29.ERRMSG 
0ERR12.ERRBLK 



OT.EDF.ERRTYP 
♦21.ERRN6R 
♦EM28.ERRMSG 
0ERR12.ERRBLK 



♦T.EDF.ERRTYP 
*22, ERRNBR 
0EM31.ERRMSG 
♦ERR12.ERRBLK 
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CKSEOM -- CHECK. RSOM, REOM 



SEQ 00/6 



3416 
341 1 



3418 
3419 
3420 
3421. 
34?? 
3423 



007056 

00/056 
007064 
007072 
007100 
007106 
007110 
007112 
007114 



STACK "RLOM NOT CLEARED" KSG 
GTDF EM30.ERR12 



012737 
012737 
012737 
012737 
000261 
000401 
000241 
000205 



000001 
000027 
013535 
017722 



002246 
002^50 
002252 
002254 



6$ 



SEC 




BR 


6$ 


CL C 




RTS 


R5 



QUEUE "DEVICE FATAL" 



{SET C BIT TO Fl.AG ERROR 
I TAKE ERROR EXIT 
{CLEAR C BIT FOR NO ERRORS 
l RETURN 



ERROR 
MOv 
MOV 
MOV 
MOV 



» 23 



*T.EDF,rRRTfP 

423,ERRN6R 

*EM30,ERRMS'", 

0ERR12.ERRBL" 
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CHKTSO -- CHECK TRANSMIT SERIAL OUT BIT 



SEQ 0077 



3425 
3426 

3427 
3428 
3429 
3430 
3431 
3432 
3433 
34 34 
3435 
3436 
3437 

J4 38 
34 39 
3440 
3441 
3442 
3443 
3444 
3445 



3446 
344 7 
3448 
3449 
3450 
3451 
3452 



007116 
007116 
007124 
007130 
007132 
007134 
007140 
007142 
007150 

00715? 

007152 
007160 
007166 
007174 
007202 
007204 

007206 
007214 

007216 



007216 
007224 
007232 
007240 

3453 007246 

3454 007250 

3455 007252 
•V-^6 007254 
54 5/ 

3458 



012737 
004537 
122000 
000000 
032725 
001422 
132737 
001040 



012737 
012737 
012737 
012737 
0O0261 
000423 

132/37 
001416 



012737 
012737 
012737 
012737 
000261 
000401 
000241 
000205 



000007 
003610 



000001 
000010 



000001 
000030 
014425 
017722 



000001 
000031 
014445 
017722 



. SBTTL ....CHKTSO -- CHECK TRANSMIT SERIAL OUT BIT 

I**************************.***********.***************************************,* 

* CHKTSO - THIS SUBROUTINE CHECKS FOR THE PROPER STATE OF TSO IN THE USYRT 
+ STATUS REGISTER, AND SETS THE "C" BIT IF IT IS NOT SET TO THE STATE 

* OF BIT IN THE WORD FOLLOWING THE CALL. 
+ 

* CALLING SEQUENCE ; 

* JSR R5. CHKTSO 



.WORD 



<BIT IS EXPECTED VALUE OF TSO> 



002412 



************* ************************************************* *************** 
CHKTSO; 

47.REGNUM ;SET REG NO. FOR POSSIBLE ERROR REPORT 
R5.READI {READ USYRT STATUS 



1$ 



007132 



002246 
002250 
002252 
002254 



MOV 

JSR 

USTATR 

.WORD 

BIT 

BFQ 

BITB 

BNE 

;*** 

GTDF 







$BIT0,CR5)* 
2i 

#TS0,1* 
3$ 
STACK "TSO NOT 
EM100.ERR12 



GET EXPECTED STATE 
BR IF EXPECTED TSO 
SEE IF TSO * 1 
BR IF TSO - 1 
SET" ERROR *** 



OK TSO 

* 



000010 007132 2$ 



SEC 
BR 

BITB 
BEQ 

;*** 

GTDF 



4$ 

OTS0.lt 
3$ 

STACK "TSO NOT 
EM101.ERR12 



;SET C 
j TAKE 



QUEUE "DEVICE FATAL 



BIT TO FLAG ERROR 
ERROR EXIT 



ERROR 9 

MOV 
MOV 
MOV 
MOV 



24 



4T.EDF,ERRTYP 
424,ERRNBR 
0EM1O0.ERRMSG 
0ERR12.ERRBLK 



;SEE IF TSO • 
;BR IF TSO • 
CLEARED" ERROR *** 







002246 
002250 
002252 
002254 



3$ 

4$ 



BR 

CLC 

RTS 



4$ 
R5 



; QUEUE "DEVICE FATAL" ERROR 25 

MOV 
MOV 
MOV 
MOV 

iSET C BIT TO FLAG ERROR 

iTAKE ERROR EXIT 

»CLEAR C BIT FOR NO ERRORS 

} RETURN 



OT.EDF.ERRTYP 
425.ERRNUR 
*EM101,ERRMSG 
4ERR12.ERRBLK 



CNDMCAO DMV11 LINE UNIT DIAG1 MACRO M1200 22 FEB-84 15;31 
.... SERIAL. -- READ/CHECK TX CHARACTER VIA TSO BIT 



PAGE 48 



SEQ 0078 



3460 
3461 
3462 
3463 
3464 
3465 
3466 
3467 
3468 
3469 
3470 
3471 
3472 
3473 
34 74 
34 75 
34 76 
3477 
34 78 
34 79 
3480 
3481 
3482 
3483 
3484 
3485 
3486 
3487 
3488 
3489 
3490 
3491 
3492 
3493 
3494 
3495 
3496 
3497 



3498 
3499 
3500 
3501 
3502 
3503 
3504 
3505 
3506 
3507 



007256 
007256 
00 7260 
007262 

007264 
007266 

007270 
007272 
007276 

007300 
007304 
007306 
007310 
007312 

007314 
007316 
007320 

007322 

007326 

007332 

007332 
007340 
007346 
0O7354 
007362 
007364 

00736* 
0073 v 
0O^>72 
7 4 

G-.//576 



010146 
010246 
010346 

005001 
012502 

006301 
004537 
000001 

004537 
000001 
103401 
005201 
077212 

012503 

020103 
001422 

010337 
010137 



012737 
012737 
012737 
012737 
000261 
00C4Ci 

00024 1 
012603 
012602 
012601 
000205 



.SBTTL SERIAL -- READ/CHECK TX CHARACTER VIA TSO BIT 

+ SERIAL - THIS SUBROUTINE SERIALLY READS/CLOCKS/CHECKS A CHARACTER FROM 
* 

+ 
♦ 

+ 

* 
+ 



THE TRANSMIT SERIAL OUT (TSO) BIT OF THE USYRT STATUS REGISTER, 
AND STACKS MESSAGE/SETS "C" 8IT IF AN INCORRFCT CHARACTER IS READ. 
NOTE: "EXPECTED VALUE" ARGUMENT IS ALWAYS READ RIGHT -TO-LEFT. 



CALLING SEQUENCE j 

JSR RS, SERIAL 

.WORD <i> OF BITS TO BE READ> 

.WORD <EXPECTED VALUE OF SERIAL BIT 5TREAM> 
***** + +.**** + * + * + + ** + + ** + + + + * +++ + * + + **** + + + * +++* + ** + + + + + + + * + * + + * + * + + + + + + + + + + + + 
SERIAL * 

MOV Rl, -CSP) {SAVE Rl 

MOV R2.-CSP) {SAVE R2 (TICKS) 

MOV R3.-CSP) {SAVE R3 (EXPECTED WORD) 



011614 



007116 



lit 



2$: 



CLR 
MOV 

ASL 
JSR 

1 

JSR 

1 

BCS 

INC 

SOB 

MOV 
CMP 
BEQ 



Rl 

CR5)*,R2 

Rl 
R5.STEPLU 



R5,CHKTS0 

2% 
Rl 
R2.1* 

(R5)*,R3 

R1.R3 

3$ 



{CLEAR ASSEMBLED^WORD 

{GET * OF TICKS 

{SHIFT ASSEMBLED WORD 

{CLOCK USYRT ONCE 



{CHECK FOR TSO-1 

{BR IF TSO-0 

»TS0-1 j SET LSB OF ASSEMBLED WORD 

{LOOP UNTIL NO MORE TICKS 

{GET EXPECTED.WORD 

{COMPARE EXPECTED, AND ASSEMBLED.WORD 

jBR IF CORRECT VALUE READ 



002400 
002402 



OOOOOl 002246 

000032 00.2250 

014471 '2252 

020036 *v;2254 



MOV R3.GDATA {EXPECTED WORD -> GDATA 

MOV Rl.BDATA j ASSEMBLED_WCRD -> BDATA 

;*♦♦ STACK "TRANSMISSION ERROR" MSG *** 
GTDF EM102.ERR13 

{ QUEUE 



"DEVICE 


FATAL" 


ERROR & 


26 










MOV 




*T.EDF 


ERRTYP 






MOV 




$26 . ERRNBR 






MOV 




*EM102 


ERRMSG 






MOV 




0ERR13 


ERRBLK 



3$: 



4$; 



''EC 




BR 


4 


CLC 




MOV 


(SP^,R3 


MOV 


(SFN.R2 


MOV 


(SPj* f Rl 


RTS 


R5 



{SET C BIT TO FLAG ERROR 
{TAKE ERROR EXIT 

{CLEAR C BIT FOR NO ERRORS 
{RESTORE REGISTERS 



{RETURN 
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,,,.1'NITRN •• INIT TRANSMISSION Of A MESSAGE 



5EQ 00/9 



3509 
35 10 
3511 

3512 
3517 
3514 

3Mt> 

3-16 

5M7 

35 1 8 

5519 
3520 
3521 
3524? 
3523 
35 t >4 
3525 
3526 
352 7 
3528 
3529 
3530 
3531 
S532 
3533 
3534 
3535 
3536 
3537 
3538 
3539 
3540 
3541 
3542 
3543 
3544 
3545 
3546 

354 7 
3548 
3549 
3550 
3551 
3552 
3553 
3554 
3555 
3556 

355 7 
5558 
3559 
3560 
3561 
3562 
3563 
3564 
3565 



.SBTTl , . . .INITRN 



INIT TRANSMISSION Of A MESSAGE 



00 7400 
007400 
00 7402 
007406 
007410 
007412 
007416 
007420 
007422 
007426 
007432 
007434 
007436 
007442 
007446 
007450 
007452 
007456 
007462 
007470 
007474 
007476 
007500 
007504 
007506 
007510 
007514 
007516 
007520 
007524 
00 7526 
007530 
00 7534 
007536 

007540 
00 7546 

00 7552 
007556 



010146 
004537 
120000 
000031 
0O4537 
120000 
000030 
112537 
0O4537 
120404 
000000 
112537 
0O4537 
120405 
000000 
112537 
005037 
113737 
0O4537 
120407 
OOOOOO 
004537 
120013 
000200 
0O4537 
12O0O6 
000300 
004557 
120007 
OOOOOO 
0O4537 
0OO110 
103454 

013737 



0045 5 7 
120000 



003734 
003734 



007434 
003734 



007450 
003734 



007476 
002456 
007476 
003734 



003734 
003734 
003734 
005432 



00 76 74 
00 7560 

003734 



♦ INITRN THIS SUBROUTINE INITIATES TRANSMISSION Of A MESSAGE, Br LOADING 

♦ THE USYRT PCSARL.H ANO THE PCR WITH THE DATA PASSED IN THE 2 WORDS 

♦ FOLLOWING THE CALL j LOADING ANO CLOCKING 1 SOM UNTIL THE FIRST 

♦ SYNCH OR FLAG HAS BEEN SERIALIZED IN THE USYRT. THE PROGRAM MONITOR', 

♦ ALL 1HE FLAGS IN THE USYRT STATUS REGISTER THROUGHOUT THE PROCE'/i. 

♦ IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION IS STACK! 

♦ ANO THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE DISCRETION 

♦ OF THE CALLING ROUTINE OR SUBROUTINE. 
4 

♦ CALLING SEQUENCE : 

♦ JSR R5, INITRN 

♦ .WORD < VALUE TO LOAD INTO USYRT PCSARl ,H> 

♦ .WORD < VALUE TO LOAD INTO USYRT PCR (PASSED IN 10 ByTE;> 

♦ <SPECIAL VIAORB MASKING VALUE (PASSED IN HI 1 Tf ). 



j SAVE Rl 

jRESET THE. USYRT 



002456 



INITRN: 




MOV 


Rl, (SP) 


JSR 


R5.WRITEI 


VIAOPB 




RTSND!DTR«PRESET 


JSR 


R5.WRITEI 


VIAORB 




RTSNOIDTR 


rtOVB 


(R5)*,ll 


JSR 


R5.WRITE1 


PCSARL 




Lis .WORD 





MOVB 


(R5)».2» 


JSR 


R5.WRITEI 


PCSARH 




21: .WORD 





MOVB 


(R5)».3I 


CLR 


SAVLEN 


MOVB 


3I.SAVLEN 


JSR 


R5,WRITEI 


PCR 




31: .WORD 





JSR 


R5.WRITEI 


VIAACR 




200 




JSR 


R5.WRITEI 


VIATIC 




300 




JSR 


R5.WRITEI 


VIAT1D 




000 




JSR 


R5.CKUSTS 


110 




BCS 


71 



007560 



MOV 20* ,131 

BICB CR5)»,13« 

JSR R5, WRITE! 
VIAORB 



iCLEAR USYRT RESET BIT 



jGET VALUE TO LOAD INTO USYRT PCSARL 
iLOAD USYRT PCSARL 



iGET VALUE TO LOAD INTO PCSARH 
iLOAD USYRT PCSARH 



iGET VALUE TO LOAD INTO PCR 

1 SAVE CHAR LENGTH BUS 
iLOAD USYRT PCR 



I SET ACR FOR U ONE -SHOT MOOfc 



jLOAO VIA TIL. -L. 



iLOAD VIA T1L-H 



iCHK USYRT STATUS FOR INIT'D STATE 

l TBMT • 1, ISO - 1 

l IF ERROR, EXIT SUBROUTINE 

j* SET UP DEFAULT VIAORB PARAMETERS 
, * CLEAR AN> SPECIFIED VIAORB BUS* 

iSET UP UStRT 
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INITRN - INXT TRANSMISSION OF A MESSAGE 



'>£Q GU>iO 



3566 
356 7 
3566 
3564 
3570 
3571 
35 7£ 

3>73 
35 74 

35 75 
3576 
3577 
35/8 
3579 
3580 
3581 
358? 
3583 
3584 
3585 
3586 
3587 
3588 
3589 
3590 
3591 
359? 
3543 
3594 
3595 
35% 
359 7 
3598 



007560 00014? 



13* 



00756? 
00 7566 
007570 
00757? 
007576 
00 7600 
00760? 
007606 
007610 
00761? 
007614 
0076?0 
00762? 
0076?6 
007630 
007632 
007640 
007642 
007644 
007650 
00765? 
007656 
007660 
007662 
007666 
007670 
007672 



00453/ 
120403 
OOOOOl 
004537 
12040? 
0O0??6 
004537 
OOOOOO 
105427 
005001 
004537 
OOOOOl 
0O453 7 
122000 
OOOOOO 
132737 
001010 
005201 
020127 
0O2761 
004537 
OOOOOl 
103403 
00453 7 
OOOOOl 
012601 
000205 



003734 



003734 



006036 



011614 
003610 



000100 007630 



000003 
006036 



005536 



4$; 



5$: 



007674 000142 



6$: 
71: 



20*: 



TXENJRXEN! TTl OOP 



JSR 


R5.WRITEI 


TDSRH 




TSOM 




JSR 


R5.WRITEI 


I USUI. 




SYNCH 




JSR 


R5.CKTBMT 







BCS 


/* 


CLR 


Rl 


JSR 

1 

JSR 


R5,STEPLU 


R5.RFA0I 


USTATR 




.WORD 





BITB 


♦TBMT, SI 


BNE 


61 


INC 


Rl 


CMP 


R1.03 


BLT 


4* 


JSR 

1 
BCS 


R5.CKTBMT 


71 


JSR 

1 

nov 


R5.CKTACT 


(SP)t.Rl 


RTS 


R5 



TXENJRXEN! TTL.QQP 



j* THIS VAUJf: MIOHT Bfc MODIFIED ABOVE 
I SET TSOM IN USrRT 

I LOAD SYNCH CHAR INTO Tx HUE 



«CHK TOR TBMT - 

j IF ERROR, EXIT SUBROUTINE 

iiNiT Cycle countcr 

jCLOCK LU FQR 1 CYCLE 
jREAD USYRT STATUS REG 



, SEF IF TBMT IS SET rp'T 

jBR IF YES 

jINCR CYCLE COUNTER 

iSFE IF 3 CYCLES OONE YET 

jBR IF LESS THAN 3 CYCLES 

I GO STACK "TBMT NOT SET' MSG 

j If ERROR, EXIT SUBROUTINE 
,CHK FOR TXACT - 1 

jRESTORE Rl 

j RETURN (IF C - 1. WE. HAD AN ERROR) 

i DEFAULT VALUE FOR VIAORB: ENABLE 
jTX ANO RX ON USYRT, ASSERT RTS, OIR 



[)/ 
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. . ..TXCHAR •■ TRANSMIT A CHARACTER 



SEQ 0081 



360C 
3601 
360? 
3603 
3604 
3605 
3606 
3607 
"*60tt 
3609 
3610 
3611 
3612 
3613 
3614 
3615 
3616 
3617 
3618 
3619 
3620 
3621 
3622 
3623 
3624 
3625 
3626 
3627 
3628 
3629 
3630 
3631 
3632 
3633 
3634 
3635 
3636 
363/ 
3638 
3639 
3640 
3641 
3642 
3643 
3644 
3645 
3646 
3647 
3648 
3649 
3650 
3651 
365? 
3653 



007676 
007676 
007700 
007702 
007 706 
007712 
007714 
007716 
007720 
007722 
007724 
007726 
007732 
007754 
007736 
007740 

007742 
007746 

007750 
007754 
007756 
007760 
007764 
007766 
007770 
007772 
007776 
010OO0 
010002 
010OO4 
010006 



010146 
010246 
012537 
004537 
120402 
000000 
005001 
005002 
112502 
001425 
004537 
000001 
103421 
020102 
001414 

131527 
001004 

004537 
000000 
103410 
004537 
000001 
005201 
000756 
004537 
000001 
012602 
012601 
005205 
000205 



»BTTL ....TXCHAR • TRANSMIT A CHARACTER 



* TXCHAR - THIS SUBROUTINE INITIATES TRANSMISSION OF A CHAR BY LOAD TNG 

* THE USYRT TDSRL WITH THE DATA PASSED IN THE 1.0 BYTE OF THE. WORD 

* FOLLOWING THE CALL. ANO CLOCKS THE LINE UNIT WITH THE NJMBER Of CYCLES 
■* PASSED IN THE SECOND WORD FOLLOWINC THE CALL. THE PROGRAM CONTINUALLY 

* MONITORS TBMT ANO TXACT THROUGHOUT THE PROCESS. 

* IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION 

* IS STACKED, ANO THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE 

* DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE. 



CALLING SEQUENCE : 

JSR R5, TXCHAR 

.WORD <DATA FOR TDSRL IN LO BYTE> 

.WORD <NUhBER Of CYCLES TO CLOCK (IN LO BYTE)> 

'SWITCH TO DISABLE INITIAL TBMT -0 CHECK (MSB IN HI BYTE J » 



TXCHAR: 



007714 
003734 



005536 



1$ 



31 



000200 
006036 
011614 

006036 



7$: 

5*: 
6«: 



MOV 

MOV 

MOV 

JSR 

TDSRL 

.WORD 

CLR 

CLR 

M0V8 

BEU 

JSR 

1 

BCS 

CMP 

BECi 

BITB 
BNE 

JSR 



BCS 

JSR 

1 

INC 

BR 

JSR 

1 

MOV 

MOV 

INC 

RTS 



Rl, (SP) 
R2.-CSP) 
(R5)*.l$ 

R5.WRITEI 



Rl 

H2 

CR5)*,R2 

6$ 

R5.CKTACT 

6$ 

R1.R2 

5$ 

(R5),*NCTBMT 
7$ 

R5,CKTBMT 

6f 

R5.STEPLU 

Rl 
3* 

R5,CKTBMT 

(5P)*.R2 

(SP)»,R1 

R5 

R5 



SAVE Rl 

SAVE R2 

GET DATA FOR TDSRL 

LOAD DATA INTO TDSRL 



INIT CYCLE COUNT ANO CLEAR C BIT 
CLEAR REQ'D CYCLE COUNT 
GET DESIRED NO. OF CYCLES 
8R IF NO CLOCKING DONE 
CHECK TXACT - 1 

BR TO EXIT IF ERROR 

SEE IF REQUIRED CYCLES DONE YET 

BR IF YES 

♦ CHECK FOR "TBMT-0 CHECK" DISABLE 

* BR IF MSB IS NOT SET 

CHECK FOR TBMT - 

BR TO EXIT IF ERROR 
CLOCK LU FOR I CYCLE 

INCR CYCLE COUNT 
KEEP CLOCKING 
CHK TBMT - 1 

RESTORE R2 

RESTORE Rl 

ADJUST R5 FOR SANE RETURN 

RETURN (WITH C BIT - 1 IF ERROR) 



/ 
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T XCTRL -- CONTROL MESSAGE TRANSMISSION (TDSRH) 



SEQ 0082 



3655 
36:»6 
365 7 
3658 
3659 
3660 
3661 
3662 
3663 
3664 
3665 
3666 
3667 
3668 
3669 
3670 
3671 
3672 
3673 
3674 
3675 
3676 
3677 
3673 
3679 
3680 
3681 
3682 
3683 
3684 
3685 
3686 
3687 
5688 
3689 
3690 
3691 
3692 
3693 
3694 
3695 
3696 
3697 
3698 



010010 
010010 
010012 
010014 
010020 
010024 
010026 
010030 
010032 
010034 
010036 
010042 
010044 
010046 
010050 
010052 
010056 
010060 
010062 
010066 
010070 
010072 
010074 
010100 
010102 
010104 
010106 



010146 
010246 
012537 
004537 
120403 
000000 
005001 
012502 
001422 
0O4537 
000001 
103416 
020102 
001411 
004537 
000000 
103410 
004537 
000001 
005201 
000761 
004537 
000001 
012602 
012601 
000205 



.SBTTL ....TXCTRL 



CONTROL MESSAGE TRANSMISSION (TDSRH) 



010026 
003734 



»♦ TXCTRL - THIS SUBROUTINE ALLOWS CONTROL OF MESSAGE TRANSMISSION Br LOADING 

;♦ THE USYRT TOSRH WITH THE DATA PASSED IN THE LO BYTE OF THE WORD 

}♦ FOLLOWING THE CALL, AND CLOCKS THE LINE UNIT WITH THE NUMBER OF CYCLES 

;♦ PASSED IN THE SECOND WORD FOLLOWING THE CALL. THE PROGRAM CONTINUALLY 

;♦ MONITORS TBMT AND TXACT THROUGHOUT THE PROCESS. 

j* IF THE SUBROUTINE DETECTS AN ERROR. THE ERROR INFORMATION 

I* IS STACKED, AND THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE 

j* DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE. 

J* 

;* CALLING SEQLtNCE : 

JSR R5, TXCTRL 

.WORO <DATA FOR TDSRH IN LO BYTE> 

.WORD <NUMBER OF CYCLES TO CLOCK > 

TXCTRL; 

Rl.-(SP) iSAVE Rl 

R2, -CSP) »SAVE R2 

(R5)»,2I jGET DATA FUR TDSRH 

R5.WRITEI |LOAD DATA INTO TDSRH 






005536 

006036 

011614 

006036 



2$ 



3* 



5i; 
6*1 



MOV 

MOV 

MOV 

JSR 

TDSRH 

.WORD 

CLR 

MOV 

BEQ 

JSR 

1 

BCS 

CMP 

BEQ 

JSR 



BCS 

JSR 

1 

INC 

BR 

JSR 

1 

MOV 

MOV 

RTS 





Rl 

(R5)».R2 

61 

R5,CKTACT 

6$ 

R1.R2 
5$ 

R5.CKTBMT 

6$ 

R5.STEPLU 

Rl 
31 

R5.CKTBMT 

(SP)»,R2 

(SP)* a Rl 
R5 



INIT CYCLE COUNT AND CLEAR C BIT 
GET DESIRED NO. OF CYCLES 
BR IF NO CLOCKING DONE 
CHECK TXACT - 1 

BR TO EXIT IF ERROR 

SEE IF REQUIRED CYCLES DONE YET 

BR IF YES 

CHECK FOR TBMT - 

BR TO EXIT IF ERROR 
CLOCK LU FOR I CYCLE 

INCR CYCLE COUNT 
KEEP CLOCKING 
CHK TBMT - l 



RESTORE R2 
RESTORE Rl 

RETURN (WITH 



C BIT w 1 IF ERROR) 



/ 
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SEQ 0083 



5700 










3701 










3702 










3703 










3704 










3705 










3706 










3707 










3708 










3709 










3710 










3711 










3712 










3713 










3714 










3715 










3716 










3717 










3718 










3719 


010110 








3720 


010110 


010146 






3721 


010112 


010246 






3722 


010114 


004537 


003610 




3723 


010120 


120401 






3724 


010122 


000000 






3 725 


010124 


0O4537 


003610 




3726 


010130 


120400 






3727 


010132 


000000 






3728 


010134 


111501 






3729 


010136 


042701 


177400 




3730 


010142 


023727 


002456 


000347 


3731 


010150 


001005 






3732 


010152 


142737 


000200 


010132 


3733 


010160 


142701 


000200 




3734 


010164 


123701 


010132 




3735 


010170 


001462 






3736 


010172 


004537 


003610 




3737 


010176 


122000 






3738 


010200 


000000 






3739 


010202 


132737 


OOO002 


010200 


3740 


010210 


001421 






3741 


010212 


012737 


000007 


002412 


3742 










3743 


010220 










010220 


012737 


000001 


002246 




010226 


012737 


000033 


002250 




010234 


012737 


013717 


002252 




010242 


012737 


017722 


002254 


3744 


010250 


000137 


011350 




3745 


010254 


005037 


002412 




3746 


010260 


005037 


002400 




3747 


010264 


110137 


002400 




3748 


010270 


005037 


002402 




3749 


010274 


113737 


010132 


002402 


3750 










3751 


010302 









. SBTTL ....RXCHAR - RECEIVE A CHARACTER 

; *********************** ***4^***********4 4***4^4***4^*****++**+*+***++++ ****** 

;* RXCHAR - THIS SUBROUTINE READS THE USYRT RDSR AND CHECKS THE CONTENTS 
;♦ AGAINST THE DATA PASSED IN THE WORD FOLLOWING THE CALL. 
i * IF BITO - IN THE SECOND WORD FOLLOWING THE CALL, THE RERR BIT IS 
;* NOT CHECKED AGAINST THE EXPECTED VALUE, THEN, IT CLOCKS 

THE LINE UNIT FOR THE NO. OF CYCLES PASSED IN THE THIRD WORD 
FOLLOWING THE CALL. THE PROGRAM CONTINUALLY MONITORS RDA ANO RXACT, 
IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION 
IS STACKED, AND THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE 
DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE. 



J* 
;♦ 
;♦ 

;* 
;* 
;* 
:* 
J* 
;* 



CALLING SEQUENCE : 

JSR R5 RXCHAR 

.WORD ^EXPECTED RDSRL IN LO BYTE, RDSRH IN HI BYTE> 

.WORD <-0 FOR NO RERR CHK, -1 FOR RERR CHK > 

.WORD <NUM6ER OF CYCLES TO CLOCK (IN LO ByTE)> 

<SPECIAL DISABLE SWITCHES: NOCRDA,NFCRDA,NCRACT( IN HI BYTEj> 

RXCHAR: 

R1,-CSP) {SAVE Rl 

R2.-CSP) iSAVE R2 

R5.READI {READ RDSRH 



2% 



1$ 



3i 



4$ 



MOV 

MOV 

JSR 

RDSRH 

.WORD 

JSR 

RDSRL 

.WORD 

MOVB 

BIC 

CMP 

3NE 

BICB 

BICB 

CMPB 

BEQ 

JSR 

USTATR 

.WORD 

BITB 

BEQ 

MOV 



R5.READI 



(R5),R1 
♦177400, Rl 



;READ RDSRL 

j GET EXPECTED RDSRL 
iMASK OFF UNUSED BITS 



SAVLEN,*TXDL!RXDL jSEE 



31 

•eiT7.ii 

#6IT7,R1 

li.Rl 

61 

R5,READI 



*TXU,4I 

5$ 

*7,REGNLT1 



;BR IF 

j CLEAR 



IF 7-BIT CHARS BEING USED 
NOT 7-BIT CHARS 
8TH BIT FOR COMPARE 



j STACK "TX WOERRUN" ERROR 



{COMPARE RCV'D CHAR TO EXPECTED 

,BR IF MATCH 

,READ USYRT STATUS REG 



{SEE IF TX UNOERRUN OCCURRED 

;BR IF NOT 

{SET USYRT REG NO. FOR STATUS REG 



GTDF 



EM54,ERR12 



QUEUE "DEVICE FATAL 



5i 



{STACK 



JMP 


20$ 


CLR 


REGNUM 


CLR 


GOATA 


MOVB 


Rl.GDATA 


CLR 


BOATA 


MOVB 


ll.BDATA 


"RCV'D 


DATA MISCOMPARE" 


GTDF 


EM34.ERR10 



{TAKE ERROR EXIT 
,SET USYRT REG NO. 
{SET EXPECTED OATA 

{SET ACTUAL DATA 

ERROR 



ERROR ♦ 
MOV 
MOV 
MOV 
MOV 



27 



OT.EDT.ERRTYP 
027.ERRNBR 
*€M54,ERRMSG 
0ERR12.ERRBLK 



FOR RDSRL 



G / 
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3752 
3753 
3 754 
3755 
3756 
3757 
3758 
3759 
3760 
3761 
3762 
3763 
3764 
3765 
3766 
3767 
3768 
3769 
3770 
3771 
3772 



3773 

3774 
3775 
3776 
3777 



3778 
3779 
3 780 
3781 
3782 
3783 
3784 
3785 



010302 
010310 
010316 
010324 
010332 
010336 
010342 
010346 
010352 
010354 
010360 
010366 
010372 
010376 
010402 
010410 
010416 
010424 

010426 
010432 
010434 
010442 

010444 

010444 
010452 
010460 
010466 
010474 
010500 
010506 

010510 

010510 
010516 
010524 
010532 
010540 

010544 
010550 
010552 
010560 

010562 



010562 
010570 
010576 
010604 

3786 010612 

3787 010616 

3788 010624 



012737 
012737 
012737 
012737 
000137 
116501 
042701 
123701 
001016 
000137 
012737 
005037 
110137 
005037 
113737 
012737 
032765 
001447 

132701 
001022 
132737 
001440 



012737 
012737 
012737 
012737 
000137 
132737 
001016 



012737 
012737 
012737 
012737 
000137 

132701 
001022 
132737 

001440 



012737 
012737 
012737 
012737 
000137 
132737 
001016 



000001 
000034 
013573 
017372 
011350 
000001 
177400 
0i'V?2 

011234 
000001 
002400 
002400 
002402 
010122 
000001 
000001 



000200 
000200 



000001 
000035 
013621 
017722 
011350 
000200 



000001 
000036 
013642 
017722 

011350 

000010 
000010 



000001 
000037 
013346 

017722 
011350 
000010 



002246 
002250 
002252 
002254 



6$ 



002412 



002402 
002412 
000002 



010122 



1% 



CHECK 



STACK 











SEQ 0084 








; QUEUE "DEVICE FATAL" ERROR 28 










MOV 


OT.EDF.ERRTYP 








MOV 


*28,ERRN8R 








MOV 


0EM34.ERRMS& 








MOV 


4ERR10.ERRBLK 


JMP 




20i 


;TAKE ERROR EXIT 




MOVB 




1CR5),R1 


j GET RDSRH 




BIC 




0177400, Rl 


{MASK OFF UNUSED BITS 




CMPB 




2*,R1 


{COMPARE RCV'D STATUS TO EXPECTED 




BNE 




7i 


jBR IF MISMATCH 




JMP 




17$ 


, CONTINUE 




MOV 




Ol.REGNUM 


j SET USYRT REG NO. FOR RDSRH 




CLR 




GOATA 


;SET EXPECTED DATA 




MOVB 




Rl.GOATA 






CLR 




BDATA 


j SET ACTUAL DATA 




MOVB 




21.BDATA 






MOV 




•l.REGNUM 


{SET REG NO. FOR PRINTOUT 




BIT 




*RERCHK,2(R5) 


;SEE IF RCV ERROR BIT SHUULD BE IGNORED 




BEQ 




9$ 


jBR IF YES 




RERR BIT 








BITB 




0RERR.R1 


iSEE IF EXPECTED BIT •' 1 




BNE 




6$ 


5 BR IF YES 




BITB 




0RERR.2* 


{SEE IF ACTUAL BIT • 




BEQ 




9$ 


; BR IF YES 




"RERR 


NOT CLEARED" MSG 






GTDF 




EM35.ERR12 







002246 
002250 
002252 
002254 

010122 81: 



JMP 20$ 

BITB *RERR,2I 

BNE 9t 

{STACK "RERR NOT SET" MSG 
GTDF EM36.ERR12 



002246 
002250 
002252 

002254 



010122 



002246 
002250 
002252 
002254 



{CHECK 
9$: 



STACK 



JMP 
R0« BIT 
BITB 
BNE 

BITB 
BEQ 
"ROR NOT 
GTDF 



201 

*R0R,R1 
101 

0R0R.2* 
111 

CLEARED" MSG 
EM16.ERR12 



010122 10$ : 



JMP 

BITB 

BNE 



201 
*R0R»2* 

11* 



j QUEUE "DEVICE FATAL" ERROR * 29 

MOV 
MOV 
MOV 
MOV 

{TAKE ERROR EXIT 

j SEE IF ACTUAL BIT - 1 

;BR IF YES 



; QUEUE "DEVICE FATAL" ERROR 30 

MOV 
MOV 
MOV 
MOV 

,TAKE ERROR EXIT 

{SEE IF EXPECTED BIT - 1 
{BR IF YES 

{SEE IF ACTUAL BIT - 
{BR IF YES 



j QUEUE "DEVICE FATAL" &RROR * 31 

MOV 
MOV 
MOV 
MOV 

{TAKE ERROR EXIT 

; SEE IF ACTUAL BIT - 1 

iBR IF YES 



♦T.EDF.ERRTYP 
029.ERRNBR 
OEM35.ERRMSG 
0ERR12.ERRBLK 



OT.EDF.ERRTYP 

♦30.ERRN8R 

*€M36,ERRMSG 

0ERR12.ERRBLK 



OT.EDf .ERRTYP 
031.ERRNBR 

*€M16,ERRMSG 
0ERR12.ERRBLK 
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SEQ 008! 



3789 










; STACK 


"ROR NOT SET" MSG 


3790 


010626 










GTDF 


EM14.ERR12 




010626 


012737 


000001 


002246 










010634 


012737 


000040 


002250 










010642 


012737 


013332 


002252 










010650 


012737 


017722 


002254 








3 791 


010656 


000137 


011350 






JMP 


20$ 


3792 










; CHECK 


RABGA 


BIT 


3 793 


010662 


132701 


000004 




11$: 


BITB 


0RABGA.R1 


3794 


010666 


001022 








BNE 


12$ 


3795 


010670 


132737 


000004 


010122 




BITB 


*RABGA,2$ 


3796 


010676 


001440 








BEQ 


13$ 


3797 










? STACK 


"RABGA 


i NOT CLEARED" 


3798 


010700 










GTDF 


EM39,ERR12 




010700 


012737 


000001 


002246 










010706 


012737 


000041 


002250 










010714 


012737 


013657 


002252 










010722 


012737 


017722 


002254 








3799 


010730 


000137 


011350 






JMP 


20$ 


3800 


010734 


132737 


000004 


010122 


12$; 


BITB 


#«ABGA,2$ 


3801 


010742 


001016 








BNE 


13$ 


3802 










; STACK 


"RABGfl 


i NOT SET" MSG 


3803 


010744 










GTDF 


EM40.ERR12 




010744 


012737 


000001 


002246 










010752 


012737 


0OOO42 


002250 










010760 


012737 


013701 


002252 










010766 


012737 


017722 


002254 








3804 


010774 


0O0137 


011350 






JMP 


20$ 


3805 










; CHECK 


REOM BIT 


3806 


OilOOO 


132701 


000002 




13$: 


BITB 


•REOfl.Rl 


3807 


011004 


001022 








BNE 


14$ 


3808 


011006 


132737 


000002 


010122 




BITB 


*RE0M,2$ 


3809 


011014 


001440 








BEQ 


15$ 


3810 










; STACK 


"REOM 


NOT CLEARED" I 


3811 


011016 










GTDF 


EM30.ERR12 




011016 


012737 


000001 


002246 










011024 


012737 


000043 


002250 










011032 


012737 


013535 


002252 










011040 


012737 


017722 


002254 








3812 


011046 


0O0137 


011350 






JMP 


20$ 


3813 


011052 


132737 


0OOO02 


010122 


14*: 


BITB 


*RE0M,2$ 


3814 


011060 


001016 








BNE 


15$ 


3815 










i STACK 


"REOM 


NOT SET" MSG 


3816 


011062 










GTDF 


EM31,ERR12 




011062 


012737 


000001 


002246 










011070 


012737 


000044 


002250 










011076 


012737 


013556 


002252 










011104 


012737 


017722 


002254 








3817 


011112 


000137 


011350 






JMP 


20$ 


3818 










{CHECK 


RSOM BIT 


3819 


011116 


132701 


000001 




15$: 


BITB 


*RS0M,R1 


3820 


011122 


001022 








BNE 


16$ 



MSG 



MSG 



{ QUEUE "DEVICE FATAL" ERROR i> 32 

MOV 

MOV 
MOV 
MOV 
{TAKE ERROR EXIT 

I SEE IF EXPECTED BIT * 1 
iBR IF YES 

j SEE IF ACTUAL BIT - 
j BR IF fES 



j QUEUE "DEVICE FATAL" ERROR o 33 

MOV 
MOV 
MOV 
MOV 

;TAKE ERROR EXIT 

;SEE IF ACTUAL BIT - 1 

;BR IF YES 



j QUEUE "DEVICE FATAL" ERROR * 34 

MOV 
MOV 
MOV 
MOV 

{TAKE ERROR EXIT 

{SEE IF EXPECTED BIT - 1 
j BR IF YES 

{SEE IF ACTUAL BIT • 
{BR IF YES 



{ QUEUE "DEVICE FATAL" ERROR * 35 

MOV 
MOV 
MOV 
MOV 

{TAKE ERROR EXIT 

{SEE IF ACTUAL BIT « 1 

{BR IF YES 



OT.EDF.ERRT/P 
*32,ERRN6R 
*EM14,ERRMSG 
*ERR12,ERRBU' 



ST.EDF.ERRTYP 
*33,ERRN6R 
*EM39.ERRMSG 
*£RR12,ERRBLK 



GT.EDF.ERRTYP 
*34,ERRNBR 
#EM40.ERRMSG 
4ERR12.ERRBLK 



♦T.EOF.ERRTYP 
G35.ERRNBR 

JEM30.ERRMSG 
*ERR12,ERRBLK 



j QUEUE "DEVICE FATAL" ERROR 36 

MOV *T.EDF,ERRTYP 

MOV *36.ERRNBR 

MOV *EM31,ERRMSG 

MOV *ERR12,ERRBLK 

j TAKE ERROR EXIT 

» SEE IF EXPECTED BIT - 1 
i BR IF YES 
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SFQ 0086 



3821 011124 

382,? 011132 

3823 

3824 011134 



011134 
011142 
011150 
011156 
011164 
011170 
011176 



3825 
3826 
3827 
3828 
3829 



3830 
3831 
3832 
3833 
3834 
3835 
3836 
3837 
3838 
3839 
3840 
3641 
3842 
3643 
3844 
3845 
3846 
384 7 
3848 
3649 
3850 
3851 
3852 
3853 
3854 
3855 
3856 
3857 
3856 
3859 
3860 
3661 
3662 
3863 
3864 
3865 
3866 
3867 



011200 

011200 
011206 
011214 
011222 
011230 

011234 
011240 

011242 
011250 
011252 
011256 
011260 

011262 

011264 

011266 

011274 
011276 
011302 
011304 

011306 
011312 
011314 
011316 

011320 
011326 
011330 
011334 

011336 

011340 
011344 
011546 
011350 
011354 
011356 
011360 



132 73/ 
001440 



012737 
012737 
012737 
012737 
000137 
132737 
001016 



012737 
012737 
012737 
012737 
000137 

116502 
005001 

13652 7 
001004 
004537 
000001 
103433 

020102 
001415 

136527 
001004 
004537 
000000 
103421 

004537 
000001 
005201 
000751 

136527 
001004 
004537 
000001 

103404 

062705 
000241 
000403 
062705 
000261 
012602 
012601 



000001 010122 



000001 
0OOO45 
013477 
017722 
011350 
000001 



000001 
000046 
013520 
017722 
011350 

000004 



000005 
005676 



000005 
006176 

011614 

000005 
006176 

000006 
000006 



BITU «RS0M.2$ 
BEQ 17$ 
{STACK "RSOM NOT CLEARED" MSG 
GTDF EM28.ERR12 



002246 
002250 
002252 
002254 

010122 16$: 



JMP 20$ 
BITB ORS0M.2J 
BNE 1 / $ 
;STACK "RSOM NOT SET" MSG 
GTDF EM29.ERR12 



002246 
002250 
002252 
002254 



000040 



17$: 
18$: 



31$: 



000200 



22% : 



000100 19$: 



30$: 

20$: 

21$: 



JMP 

MOVB 
CLR 

BITB 
BNE 

JSR 

1 

BCS 

CMP 
BEQ 

8ITB 

BNE 

JSR 



BCS 

JSR 
1 

INC 
BR 

BITB 
BNE 

JSR 

1 

BCS 

ADO 

CLC 

BR 

ADO 

SEC 

MOV 

MOV 



20$ 

4CR5),R2 
Rl 

5(R5),*BIT5 

31$ 

R5.CKRACT 

20$ 

R1.R2 
19$ 

5(R5),*BIT7 

22$ 

R5.CKRDA 

20$ 

R5.STEPLU 

Rl 
18$ 

5(R5;,*flIT6 

30$ 

R5.CKRDA 

20$ 

*6.R5 

21$ 
♦6.R5 

(SP)».R2 
(SP)*,Rl 



;SEE IF ACTUAL BIT « 
}BR IF YES 



QUEUE "DEVICE FATAL 



j TAKE ERROR EXIT 
sSEE IF ACTUAL BIT 
iBR IF YES 



i QUEUE "DEVICE FATAL" ERROR * 38 

MOV 
MOV 
MOV 
MOV 

iTAKE ERROR EXIT 

;GET DESIRED NO, OF CYCLES 
;INIT CYCLE COUNT 

i* IS RXACT CHECK TO BE DISABLED ? 
i* BR I ,; YES 

jCHK hUR RACT - 1 

;BR TO EXIT IF ERROR 

:SEE IF REQUIRED CYCLES DONE YET 
I BR IF YES 

i* SEE IF INITIAL RDA CHECK DESIRED 
j* BR IF NO 
,CHK FOR RDA » 

jBR TO EXIT IF ERROR 

jCLOCK LU FOR 1 CYCLE 

jINCR CYCLE COUNT 
{CONTINUE CLOCKING 

j* IS FINAL RDA CHECK TO BE SKIPPED ? 
j* BR IF YES 
jCHK RDA - I 

;BR IF ERROR 

I FIX UP RETURN ADRS 
I SET T - FOR NO ERROR 
iTAKE ERROR -FREE EXIT 
jFIX UP RETURN ADDRESS 
;SET C BIT FOR ERROR 
:RESTORE R2 
{RtSTQRE Rl 



ERROR 


37 






MOV 




GT.EDI- 


.ERRT'P 


MOV 




037.ERRN6R 


MOV 




*EM?8, 


FRRMSCi 


MOV 




0ERR12 


.ERRBLK 



OT.EDF.ERRTYP 
*38,ERRNBR 
^EM29,ERRMSG 
CERR12.ERRBLK 



' i 
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Sfc'Q OOft 7 
, ...RXCHAR - RtCEIVE A CHARACTfcR 

3868 011362 000205 RT5 R5 j RE TURN 



• / 
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RCV1ST -- RECEIVE FIRST CHARACTER OF MLSSAGE 



5fc'0 0088 



38 70 
3871 
3872 
3873 
3874 
3875 

?6?6 
3877 

38 78 
3879 
3880 
3881 
3862 
3883 
3884 
3885 
3886 
3887 
3888 
3889 
3890 
3891 
3892 
3893 
3894 
3895 
3896 
3897 
3898 
3899 
3900 
3901 
3902 
3903 
3904 
3905 
3906 
3907 
3908 
3909 
3910 
3911 
3912 
3913 
3914 
3915 
3916 
3917 
3918 
3919 
3920 
3921 
3922 
3923 
3924 



■ SBTTL RCV1ST 



RECEIVE FIRST CHARACTER OF MESSAGE 



011364 
011364 
011366 
011370 
011372 
011374 
011400 
011404 
011406 
011410 
011414 
011416 
011420 
011424 
011426 
011430 
011434 
011436 
011440 
011444 
011446 
011450 
011456 
011460 
011462 
011464 
011470 
011472 
011474 
011500 
011502 
011506 
011510 
011512 
011516 
011520 
011522 
011524 
011526 
011530 



01C146 
010246 
005001 
012502 
062702 
004537 
000000 
103446 
004537 

000000 
103442 
004537 
000000 
103436 
004537 
000001 
005201 
004537 
122000 
000000 
132737 
001006 
020102 
002762 
004537 
000001 
103414 
020165 
002004 
004537 
000000 
103405 
004537 
000001 
103401 
000241 
012602 
012601 
000205 



♦ RCV1ST - THIS SUBROUTINE RECEIVES THE FIRST CHAR OF A MESSAGE ANO MONITORS 

♦ THE STATUS OF THE. RECEIVER. FIRST, A CHECK IS MADE FOR RXACT • 0, 
+ RDA - 0, RSA ■ 0, RSOM • 0. THEN, THE LINE UNIT IS CLOCKED UNTIL 

♦ PDA * 1. THE PROGRAM CHECKS FOR THIS TO OCCUR WITHIN 3 CYCLES AFTER 

♦ THE NO. OF CYCLES PASSED IN THE SECONO WORD FOLLOWING THE CALL. 

♦ IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION 

♦ IS STACKED, AND THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE 

♦ DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE. 



****** 
RCV1ST; 



CALLING 

JSR 

.WORD 



SEQUENCE 

R5.RCV1ST 

'EXPECTED 



RECEIVER CYCLE COUNT> 



******************************** + «^******* + + ******4>*********** + ******** 



000003 
005676 



006176 
006636 
011614 
003610 
000200 011446 

006176 

177776 

006176 

005676 



1$ 



2* 



3t 



At 



5$ 

6* 



MOV 

MOV 

CLR 

MOV 

ADD 

JSR 



BCS 

JSR 



BCS 

JSR 



BCS 

JSR 

1 

INC 

JSR 

USTATR 

.WORD 

BITB 

BNE 

CMP 

BLT 

JSR 

1 

BCS 

CMP 

BGE 

JSR 



BCS 

JSR 

1 

BCS 

CLC 

MOV 

MOV 

RTS 



Rl.-CSP) 

R2,-(SP) 

Rl 

(R5)*.R2 

#3,R2 

R5,CKRACT 

6* 

R5.CKRDA 

6$ 
R5,CKSE0M 

61 

R5.STEPLU 

Rl 

R5.READI 



♦PDA, 2* 
3$ 

R1,R2 

1$ 

R5.CKRDA 

61 

R1.-2CR5) 

4$ 

R5.CKRDA 

6$ 

R5.CKRACT 

6t 

(SP)*,R2 
CSP)t # Rl 
R5 



j SAVE Rl 
;SAVE R2 
jINIT CYCLE COUNT 

{GET CYCLE COUNT LIMIT 

;CHK FOR RXACT - 

;BR TO EXIT IF ERROR 
jCHK FOR RDA - 

;BR TO EXIT IF ERROR 

jCHK FOR RSOM - 0, REOM - 

iBR TO EXIT IF ERROR 
j CLOCK LU FOR 1 CYCLE 

i INCREMENT CYCLE COUNT 
;READ USYRT STATUS REG 



,SEE IF RDA SET YET 

iBR IF YES 

j SEE IF LIMIT EXCEEDED 

jBR IF NOT YET 

jGO STACK "RDA NOT SET" MSG 

jBR TO EXIT IF ERROR 

j SEE IF LESS THAN REQUIRED CYCLES 

,BR IF NOT 

j GO STACK "RDA NOT CLEAREO" MSG 

jBR TO EXIT IF ERROR 
iCHK FOR RXACT - 1 

,BR TO EXIT IF ERROR 

{CLEAR C BIT FOR NO ERRORS 

jRESTORE R2 

{RESTORE Rl 

i RETURN (WITH C BIT • 1 IF ERROR) 
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ENDTRN -- SHUT DOWN TRANSMITTER/RECEIVER 



SEQ 00*9 



3926 
392 ? 
3928 
3929 
3930 
3931 
3932 
3933 
3934 
3935 
3936 
3937 
3938 
3939 
3940 
3941 
3942 
3943 
3944 
3945 
3946 
3947 
3948 
3949 
3950 
3951 
3952 
3953 
3954 
3955 
3956 
3957 
3958 
3959 
3960 
3961 



011532 
011532 
011536 
011542 
011544 
011546 
011552 
011554 
011556 
011562 
011564 
011566 
011572 
011574 
011600 
011602 
011604 
011610 
011612 



.SBTTL ....ENDTRN --- SHUT DOWN TRANSMITTER/RECEIVER 
+.*.*.*. + + * + + *.**. + *.**. + + + *4.** + **.* + *. + *** + ** + * + + + t* + **.i + ti. + **A + *mmm*m + mmi 

THIS SUBROUTINE TERMINATES A MESSAGE BY CLEARING TXEN AND RXEN, 
CLOCKING THE LINE UNIT TOR THE NUMBER OF CYCLES PASSED IN THE WORD 
FOLLOWING THE CALL, AND CHECKING FOR THE USYRT TRANSMITTER AND 
RECEIVER TO BE SHUT DOWN. 

3> THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION 
IS STACKED, AND THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE 
DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE. 
NOTE; THIS ROUTINE ASSUMES THAT TTLOOP MODE SHOULD BE ENABLED. 



* ENDTRN 

♦ 

+ 

* 
+ 

* 



012537 
004537 
000001 
103422 
004537 
000001 
103416 
004537 
120000 
000002 
004537 
OOOOOO 
004537 
OOOOOO 
103403 
004537 
OOOOOO 
000205 



011572 
005536 



0056/6 
003734 

011614 

005536 

005676 



2* 



6$ 



MOV 


(R5)*,2* 


JSR 

1 

BCS 


R5,CKTACT 


6$ 


JSR 

1 

BCS 


R5.CKRACT 


6* 


JSR 


R5.WRITEI 


VIAORB 




TTLOOP 




JSR 


R5.STEPLL 


.WORD 





JSR 


R5.CKTACT 







BCS 


6$ 


JSR 


R5.CKRACT 







RTS 


R5 



CYCLES TO CLOCK 



CALLING SEQUENCE : 
JSR R5,ENCTRN 
<N0. OF CYCLES TO CLOCK > 

ENDTRN: 

iGET DESIRED NO. OF 
iCHK FOR TXACT - 1 

{BR IF ERROR 

jCHK FOR RXACT » 1 



iCLEAR TXEN AND RXEN IN USYRT 
;** AND KEEP TTLOOP ENABLED ** 

•CLOCK LU FOR DESIRED NO, OF CYCLES 

;CHK FOR TXACT - 



i BR IF ERROR 

iCHK FQR RXAQT * 
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..,, STEPLU -- CLOCK THE USYRT N TIMFS 



M / 
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SEQ 0090 



3963 
3964 
3965 
3966 
396 7 
3966 
3969 
3970 
3971 
3972 
3973 
3974 
3975 
3976 
3977 
3978 
3979 
3980 
3981 
3982 
3983 
3984 
3985 
3986 
3987 
3988 
3989 
3990 
3991 



SBTTL ....STEPLU -• CLOCK THE USYRT N TIMES 



A*********************** 



* 

+ 

* 

* 

* 
i* 
;♦ 
:* 



STEPLU - THIS SUBROUTINE CLOCKS THE LINE UNIT FOR THE NUMBER OF 
PASSED IN THE WORD FOLLOWING THE CALL. THE VIA ACR MUST BE 



CYCLES 
PREVIOUSLY 



SET UP FOR 
TO CONTROL 

DOES IS TO 
DESIRED 



Tl ONE-SHOT MODE, AND THE Tl 
THE WIDTH OF THE CLOCK PULSE 
LOAD 000 INTO THE HI BYTE OF 
NUMBER OF TIMES. 



LATCHES MUST BE PREVIOUSLY SET 

ALL THAT THIS SUBROUTINE 
THE Tl COUNTER, FOR THE 



011614 
011614 
011616 
011620 
011624 
011626 
011630 
011632 
011634 
011636 



010146 
012501 
004537 
120005 
000000 
005301 
001372 
012601 
000205 



003734 



CALLING SEQUENCE j 

J5R R5 STEPLU 

.WORD <NUMBER OF CYCLES TO CLOCK > 

; ** + + ** + A + * + ±+. + ti±*±±*, + + *. + +*+,A+.+,A + ± + + + + ±++, + + + + + + + *+.+ 4,4. + + 4, + +,+.+ \ + + + + +++ + + ++. + + + + + 

STEPLU: 

Rl. -CSP) iSAVE Rl 

(R5)*,R1 jINIT CYCLE COUNTER 

R5.WRITEI {LOAD T1C-H, START COUNTER, CLOCK 1 CYCLE 



1$ 



MOV 

MOV 

JSR 

VIAT1B 

000 

DEC 

BNE 

MOV 



Rl 

1$ 

(SP)f.Rl 

R5 



jOECR CYCLE COUNTER 

{BR IF ALL CYCLES NOT DONE YET 

{RESTORE Rl 

{RETURN 



CNDMCAO OMVli LINE UNIT DIAG1 

GLOBAL ERROR REPORT SECTION 

3993 
3994 
3995 
3996 
3997 
3998 
3999 
4000 

4001 011640 045 116 

4002 011645 045 116 
4003 

4004 011650 045 116 

4005 011705 045 116 

4006 011771 045 116 

4007 012027 045 116 

4008 012062 045 116 

4009 01206/ 045 116 

4010 012122 045 116 

4011 012165 045 116 
4012 

4013 012252 045 116 

4014 012326 045 101 

4015 012347 045 116 

4016 012366 045 101 

4017 012420 045 101 
4018 

4019 012472 045 116 

4020 012523 045 124 

4021 012533 045 116 

4022 012555 045 101 

4023 012634 045 116 

4024 012647 045 117 

4025 012677 045 123 

4026 012732 045 124 

4027 012741 045 124 
4026 012746 045 116 

4029 013003 045 116 

4030 013051 045 116 
4031 

4032 013103 122 105 

4033 013142 125 123 

4034 013211 115 111 

4035 013235 115 122 

4036 013252 116 125 

4037 013302 116 125 

4038 013332 122 117 

4039 013346 122 117 

4040 013366 122 105 

4041 015414 111 116 

4042 013446 111 116 

4043 013477 122 123 

4044 013520 122 12:1 

4045 013535 122 10l> 

4046 013556 122 105 

4047 013573 122 103 

4048 013621 122 105 

4049 013642 122 105 



N/ 
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.SBTTL GLOBAL ERROR REPORT SECTION 

/////////////////////////////////////////////////////////////////// 
/ THE GLOBAL ERROR REPORT SECTION CONTAINS ERROR MESSAGES 
/ THAT ARE USED IN MORE THAN ONE TEST. 
/////////////////////////////////////////////////////////////////// 



SEQ 0091 



045 
000 

045 
045 
045 
045 
045 
045 
045 
045 

045 
040 
045 
040 
040 

045 
045 
045 
105 
045 
063 
064 
045 
045 
045 
045 
045 

107 
131 
103 
104 
114 
114 
122 
122 
101 
103 
103 
117 
117 
117 
117 
126 
122 
122 



.NLIST 
ENDEMB; 

NEWLIN: 

FMT2 

FMT3 

FMT4 

FMT4A: 

FMT4B: 

FMT4C: 

FMT5; 

FMT5A? 

FMT10: 
FMT10A 
FMTH: 
FMT15: 
FMT15A 



FMT19 
FMT21 
FMT22 
FMT23 
FMT24 
FMT25 
FMT26 
FMT27 
FMT29 
FMT30 
FMT31 
FMT32 



EMI 

EM2 

EM3 

EM4 

EM5 

EM6 

EM14 

EM16 

EM25 

EM26 

EM27 

EM28 

EM29 

EM30 

EM31 

EM34 

EM35 

EM36 



BEX 
.ASCIZ 

.ASCIZ 

.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 

.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 

.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 

.ASCIZ 
.ASCIZ 

♦ ASCIZ 

.MSCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
, ASCIZ 



/#N*N/ 
/*N/ 



;USED TO TERMINATE ERROR MESSAGES 



/*N*AFAILING REG - *T*ASEL*01/ 

/*N*A EXPECTEO: *03*A ACTUAL; *03*A XOR: *03/ 

/#N*ATHE CONTENTS OF ALL*T*N*T/ 

/*N*S1*03*S5*03*S5*03*S5*03/ 

/*N¥T/ 

/#N*S5*03i<S5#03rfS5*03rfS5i<03/ 

/*N*A WHEN *03*A LOADED INTO BSEL1/ 

/#N*A ATTEMPTING "M-LOOP" FUNCTION CODE *02*A (¥T*A)/ 

/*N*A EXPECTED :#08#A ACTUAL :*08*A X0R:*08/ 

/*A LSI ADDR:*08/ 

/*N*08*08*08*08/ 

/#A DETECTED IN *T*T*A - - / 

/*A DETECTED a TEST PATTERN ELEMENT *D2/ 

/#N*ATEST tfD2*A NOT RUNKN/ 

/*T*06*N/ 

/*N#AFAILING REG: / 

/rfAEXPECTED; *03*S5*AACTUAL : *03*S5*AX0R; *03*N/ 

/#N*TiiN*T#N/ 

/*03#S5*03#S5*03#S5#03#N/ 

/#S4#03«S5*03#S5*03*S5*03*N/ 

/*T#TilN/ 

/*T*N/ 

/*N*AFOR BAUO RATE SPECIFIED,/ 

/*N*AIMPROPER CONNECTOR TYPE SPECIFIED/ 

/#N#AFOR OPTION SPECIFIED,/ 

/REG NOT INITIALIZED BY MST CLR/ 

/USYRT NOT INITIALIZED BY PROGRAM RESET/ 

/MICRO-DIAG. FAILURE/ 

/MRDY TIMEOUT/ 

/NULL CLK BIT STUCK AT 0/ 

/NULL CLK BIT STUCK AT 1/ 

/ROK NOT SET/ 

/ROR NOT CLEARED/ 

'READ/WRITE DATA ERROR' 

/INCORRECT DATA CHAR RCV 0/ 

/INCORRECT CRC BYTE RCV D/ 

/RSOM NOT CLEARED/ 

/RSOM NOT SET/ 

/REOM NOT CLEARED/ 

/REOM NOT SET/ 

/RCV'D DATA MISCOMPARE/ 

/RERR NOT CLEARED/ 

/RERR NOT SET/ 






CNOMCMO DMVU LINE UNIT DTAG1 
GLOBAL ERROR REPORT SECTION 



MACRO M1200 



4050 
4051 
4052 
4053 
4054 
4055 
4056 
4057 
4056 
4059 
4060 
4061 
4062 
4063 
4064 
4065 
4066 
4067 
4066 
4069 
407C 
4071 
40 72 
4073 
4074 
40/5 
40/6 
40/7 
4078 
4079 
4080 
4081 
4062 
4033 
4084 
4085 
4086 
4087 
4088 
4089 
4090 
4091 
4092 
4093 
4094 
4095 
4096 
4097 
4098 
4099 
4100 
4101 
4102 
4103 
4104 
4105 
4106 



01365 7 
013701 
013717 
013741 
013760 
014007 
014025 
014047 
014065 
014107 
014124 
014145 
014161 
014201 
014215 
014235 
014266 
014323 
014357 
014404 
014425 
014445 
014471 



014541 
014577 
014641 
014700 
014743 
014773 
015033 
015074 
015076 
015121 
015211 
015501 
015321 
015341 
015361 
015433 
015471 
015541 
015567 
015604 
015642 
015704 
015717 
015754 
016015 
016051 



122 
122 
124 
122 
125 
124 
124 
122 
122 
124 
124 
122 
122 
122 
122 
122 
122 
124 
124 
124 
124 
124 
124 



102 
040 
102 
040 
040 
040 
040 
102 
040 
040 
040 
O40 
040 
040 
040 
040 
040 
104 
125 
122 
040 
126 
117 
040 
124 

040 



101 
101 
130 
105 
123 
130 
150 
130 
130 
102 
102 
104 
104 
123 
123 
105 
105 
102 
105 
105 
123 
123 
122 



123 
040 
123 
040 
102 
040 
040 
000 
123 
122 
040 
105 
101 
130 
040 
040 
040 
105 
123 
104 
040 

111 
122 

040 
062 
040 



102 
102 
040 
107 
131 
101 
101 
101 
101 
115 
115 
101 
101 
101 
101 
103 
103 
115 
122 
122 
117 
117 
101 



105 
040 
105 
040 
131 
040 
040 

105 
105 
040 

130 
103 
117 
116 
040 
040 
126 
131 
123 
040 
101 
102 
040 
103 
040 



*.M3° 

erwo 

EM54 
EM66 
EM68 

EM69 

EM/0 
EM71 
EM72 

wrrs 

EM74 

EM 7 5 

EM76 

EM77 

EM78 

EM*K> 

EM91 

EM92 

EM98 

EM99 

EM10O 

EM101 

EM102 



.SBTTL 



TXT1: 

TXT2: 

TXT2A: 

TXT28: 

TXT3: 

TXT4; 

TXT4A; 

TXT5 

TXT6 

TXT7 

TXT7A; 

TXT8: 

TXT9: 

TXT10: 

TXT11: 

TXT11A 

TXT11B 

TXT12 

TXT13 

TXT14 

TXT15 

TXT16 

TXT 17 

TXT18 

TXT19 

TXT2Qi 
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•ASCI7 /RABGA NOT CLEARED/ 

.ASCI/ /RA8GA NOT SET/ 

.ASCI/ /TX UNOERRUN ERROR/ 

.ASCI/ /REG MISCOMPARFV 

.ASCI/ /USYRf STATUS INCORRECT/ 

.ASCI/ /TXACT NOT SET/ 

.ASCI/ /TXACT NOT CLEARED/ 

.ASCI/ /RXACT NOT SET/ 

.ASCI/ /RXACT NOT CLEARED/ 

.ASCI/ /TBMT N0 T SET/ 

.ASCI/ /TBMT NOT CLEARED/ 

.ASCI/ /ROA NOT SET/ 

.ASCI/ /RDA NOT CLEARED/ 

.ASCI/ /RSA NOT SET/ 

.ASCI/ /RSA NOT CLEARED'' 

.ASCI/ /RECEIVER OVERRUN NOT SET/ 

■ASCI/ /RECEIVER OVERRUN NOT CLEARED/ 

.ASCI/ /TBMT INTERRUPT TEST FAILURE/ 

.ASCI/ /TERR BIT NOT CLEARED/ 

.ASCI/ /TERR BIT NOT SET/ 

.ASCI/ /TSO BIT HOT SET/ 

.ASCI/ /TSO BIT NOT CLEARED/ 

.ASCI/ /TRANSMISSION ERROR (AS READ BY 



SEQ 0092 



TSO BIT)/ 



...TEXT STRINGS FOR ERROR HANDLERS 
TEXT USED BY ERROR HANDLERS 



"TXT 



.ASCI/ 
.ASCI/ 
.ASCI/ 
.ASCI/ 
■ASCI/ 
.ASCI/ 
.ASCI/ 
.ASCI/ 
•ASCI/ 
.ASCI/ 
.ASCI/ 
.ASCI/ 
.ASCI/ 
•ASCI/ 
•ASCI/ 
.ASCI/ 
.ASCI/ 
.ASCI/ 
■ASCI/ 
.ASCI/ 
.ASCI/ 
.ASCI/ 
.ASCI/ 
.ASCI/ 
.ASCI/ 
♦ASCX£ 



/BSELO BSELl BSEL2 BSEL3/ 

/ BSEL4 BSEL5 BSEL6 BSEL 7/ 

/BSEL10 BSELU BSEL12 BSEL13/ 

/ BSEL14 BSEL15 BSEL16 BSEL17/ 

/ BYTE SELECT REG'S ARE:/ 

/ SELO SEL2 SEL4 SFL6' 

/ SEL10 SEL12 SEL14 SEL16/ 

/B/ 

ARE;/ 
ORB ORA DORB DORA T1CL UCH 
T2CL T2CM SR ACR PCR IFR 
/ 
/ 
/ 

REGISTERS:/ 
CONTROL A T A/ 

OUT ADDR. IN ADDR./ 

A00HES5 : / 



SELECT REG'S 
REGISTERS 

EXPECTEO: 
ACTUAL: 
XOR: 
N P R 



TILL 
IER 



OKA 



/DEVICE CSR 

/USYRf REGS :/ 

/RDSRL RDSRH TDSRL 

/ PCSARL PCSARH PCR 

/VIA REGS :/ 

/ORB ORA DORB 

/ T1CI T; I Till 

/T£CL T2CH SR 

/ PCR 1KB IER 



TDSRH/ 

USTAT/ 

DDRA/ 

TILH/ 
ACR/ 

URA/ 



'./ 
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,,»,Tf.xT STRINGS EOR ERROR Hr,NDl ERS • "TXT, •• 



St'Q 009 



410 7 
410M 
4109 
4110 
4111 
4112 
4113 
4114 
4115 
4116 
4117 
4118 
4119 
4120 
4121 
4122 
4123 
4124 
4125 
4 126 
412 7 
4128 
4129 
4130 
4131 
4132 
4133 
4134 
4135 
4136 
4137 
4138 
4339 
4140 
4141 
4142 
4143 
4144 
414b 
4146 
414/ 
4148 
4149 
4150 
4151 
4152 
4153 
4154 
4155 
4156 
4157 
4158 
4159 
4160 
4161 
4162 
4163 



016111 

016113 
016117 
016133 
016150 
016172 
016213 
016*43 
016255 

016312 
016330 
016334 
016340 
016345 
016352 
016357 
016364 
016371 
016376 
016403 
016410 
016413 
016417 
016423 
016427 
016433 

016437 
016444 
016454 
016464 
016474 
016511 
016526 
016543 
016557 
016573 

016607 
016622 
016630 
016636 
016644 
016652 
OI066I 
016670 
016674 



021 

116 
122 
127 
116 
116 
123 
125 
101 

126 
11^ 
117 
104 
104 
124 
124 
124 
124 
124 
124 
123 
101 
120 
HI 
111 
117 

116 
103 
104 
104 
101 
101 
101 
101 
101 
101 

125 
122 
122 
124 
124 
120 
120 
120 
125 



000 

117 

105 
122 

120 
120 
105 
116 
114 

111 
122 
122 
104 
104 
061 
061 
061 
061 
062 
062 
122 
103 
103 
106 
105 
122 

120 
117 
101 
101 
104 
104 
104 
104 
104 
104 

123 
104 
104 
104 
104 
103 
103 
103 



TXTNU : .BYTE 21,0 



iCTl. Q 



THIS CWt MOPE) 15 HARMLESS 



120 
101 

111 
122 
122 
124 
104 
114 

101 
102 
101 
122 
122 
103 
103 
114 
114 
103 
103 
OOO 
122 
122 
122 
122 
101 

122 
116 
124 
124 
104 
104 
104 
104 
104 
104 

131 

123 
123 
123 
123 
123 
123 
122 
124 



TXTMLO 
TXTML1 
TXTML2 
TXTML5 
TXTML4 
TXTML5 
TXTML6 
TXTML.7 

TXTVRj 
TXTVRO 
TXTVR1 
TXTVR2 
TXTVR3 
TXTVR4 
TXTVR5 
TXTVR6 
TXTVR7 
TXTVRO 
TXTVR9 
TXTVRA 
TXTVRB 
TXTVRC 
TXTVRO 
TXTVRE 
TXTVRF 

TXTWt 
TXTNPO 
TXTNP1 
TXTNP2 
TXT^>3 
TXTNP4 
TXT*#>5 
TXT^6 
TXTNP7 
TXTNPO 

TXTUR: 

TXTUPO 

TXTUR1 

TXTUR2 

TXTUR3 

TXTUR4 

TXTUR5 

TXTUR6 

TXTUR7 

.LIST 

.EVEN 



.SBTTI 
i - • - - ■ 
I 



.ASCI/ 

.ASCIZ 
.ASCI? 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 

.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASLTZ 

.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 

.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 

.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCTZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
BEX 



/NOP/ 

/READ 1 BYTE/ 

/WRITE 1 BiTE/ 

/NPR-OUT 256 BYTl 5/ 

/NPR IN 256 BYTES/ 

/SET MICROPROCESSOR'S PC/ 

AJNOF.f'INFD/ 

/allow u« processor interrupts/ 
/via register / 

/ORB/ 

/ORA/ 

/DORB/ 

/DORA/ 

/UCL/ 

/T1CH/ 

/TILL/ 

/TlLH/ 

/T2CL/ 

/T2CH/ 

/SR/ 

/ACR/ 

/PCM/ 

/WHS 

/IER/ 

/ORA/ 

/NPR / 
/CONTROL/ 
/DATA HI/ 
/DATA LO/ 
/AODR. OUT EX/ 
/ADOR. OUT HI/ 
/AOOR. OUT 1.0/ 
/ADOR, IN EX/ 



/AOOR. 
/AOOR. 



IN HI/ 

IN LO/ 



/USYRT REG / 

/ROSRL/ 

/RDSRM/ 

/TDSRL/ 

/TOSRh/ 

/PCS ARE/ 

/PCSARH/ 

/PCR/ 

/USTAT/ 



...TEXT ADDRESS TAHl ES FOR ERROR HANOLERS "TXT,. ..T* 
T£XT ADDRESS TABLtS UStD BY ERROR HANDLERS 



CNOMCAO OMVU LlNfc LiN IT DIAG1 MACRO M1200 .'.^ f H) H4 15:31 PAUF 56 5 
....TEXT ADDRESS TABLES FOR ERROR HANDLERS -- "TXT,.T" 



41M j - - ■ 

4 165 

4166 016702 016113 016117 016153 XTMLT: .WORD 
016710 016150 016172 016213 

016716 016243 016255 
4 167 

4168 016722 016312 .WORD 

4169 0167,>4 016330 016334 016340 TXTVRT : .WORD 
016732 016345 016352 016357 

016740 016364 016371 

4170 016744 016376 016403 016410 .WORD 
016752 016413 016417 016423 

016760 016427 016433 
4171 

4172 016764 016437 .WORD 

4173 016766 016444 016454 016464 TXTNPT • .WORD 
016774 016474 016511 016526 

017002 016543 016557 016573 

4174 017010 016622 016630 016636 TXTURT; .WORD 
017016 016644 016652 016661 

017024 016670 016674 
4175 
4176 



SF/J 0094 



TXTMLO, TXTML1 , TXTML2, TXTML5, TXTMl 4 , TXTMl.5, T/TML6, TXTML7 



TXTVH 
TXTVR0,TXTVRl,TXTVR2 t TXTVR3,TXTVR4 l TXTVR5,TXTVR6,TXTVR7 

rXTVR6,TXTVR9,TXTVRA $ TXTVRB,TXTVRC,TXTVRD,TXTVRE,TXTVRF 



TXTNP 
TXTNP0,TXTNPl,rXTNP2,TXTNP3,TXTNP4,TXTNP5 t TXTNP6 # TXTNP7 i TXTNP8 

TXTUR0,TXTURl l TXTUR2,TXTUR3,TXTUR4 t TXTUR5.TXTUR6.TXTIJR7 



R5 



CNDMCAO DMV11 LINF LiNT T DlAGl MACRO M1200 22 FFB-84 15; 31 PAGE 57 
TEXT ADDRESS TABLES FOR ERROR HANDLERS -- "TXT__T" 



SEQ 0095 



4178 
4179 
4180 
4181 

4182 
4183 
4184 
4185 
4186 
4187 



4186 
4189 
4190 
4191 
4192 
4193 
4194 
4195 
4196 



4197 
4198 
4199 
4200 



4201 
4202 
4203 
4204 

4205 



4206 

4207 



017030 
017030 
017030 
017034 
017036 
017042 
017046 
017050 
017050 
017052 
017056 
017062 
017064 
017066 
017072 

017074 
017076 
017100 
017104 
017106 
017112 
017114 
017114 
017120 
017124 
017130 
017134 
017136 
017140 

017144 
017146 
017152 
017152 
017152 



017154 
017154 
017154 
017154 
017160 
C17164 
017170 
017174 
017176 
017200 
017204 
017210 
017210 
017214 
017220 



105037 
0101*6 

013701 
022/01 
002012 

010146 
012746 
012746 
010600 
104415 
062706 
000424 

001001 
005001 
022701 
002002 
012701 
006301 

016146 
013746 
012746 
012746 
010600 
104415 
062706 

012601 

004737 



104423 



013746 
012746 
012746 
012746 
010600 
104414 
062706 
004737 

013746 
013746 
013746 



002401 

002400 
000017 



012122 
000002 



000006 

000007 
000006 



016702 
002400 
012165 
000003 



000010 
020160 



002412 
015074 

011650 
000003 



ooooio 

020134 

OO2404 
0O2402 
002400 



.SBTTL ERROR HANDLER 

BGNMSG ERR4 



ERR4 



M-LOOP TIMEOUT ERROR HANDLING 



CURB 

MOV 

MOV 

CMP 

BGE 

PRINTX 



GDATA*1 
Rl, (SP) 
GDATA.R1 
017. Rl 
51 
0FMT5.R1 



ERR4- : 

{MAKE SURE BIT 8 DOESN'T PRINT* 

;SAVE THE WORKING REGISTER 

j SAVE THIS FOR LATER 

{WAS THIS AN M-LOOP REQUEST? 

i YES, THEN REPORT THE FUNCTION COOE 

jNO, THEN IT MUST BE 



A 



5$; 
6$: 

7$: 



BR 

BNE 
CLR 
CMP 
BGE 
MOV 
ASL 
PRINTX 



20* 

61 

Rl 

07, Rl 

7$ 

06, Rl 

Rl 

0FMT5A.GDATA,TXTMLT(R1) 



BSEH SETTING 

MOV Rl.-CSP) 

MOV 0FMT5.-CSP) 

MOV 02, -(SP) 

MOV SP,RO 

TRAP CI°NTX 

ADD 06, SP 



A "NOP" AND 

SO REFLECT. 



20*: 



MOV 
JSR 
ENDMSG 



(SP)*,R1 

PCERR5* 



j IF IT WAS A 17, THIS IS 
l THE TEXT POINTER MUST 
jIS FUNCTION COOE > 7? 
{NO. THAN WE CAN HANDLE IT 
{YES, THAN IT'S UNDEFINED -- SAY 
{CONVERT TO A WORD OFFSET 
{REPORT THE FAILING FLf4CTI0N 

MOV 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADO 

{RESTORE THE WORKING REGISTER 
{DUMP THE SELECT REGISTERS 



L 10002: 



TRAP 



BGNMSG ERR5 

PRINTB 0FMT2 , OTXT 5 , REGNUM 



ERR5:s 



JSR PC.X0RG8 

PRINTB OFMTIO.GDATA.BDATA.XDATA 



SO 



TXTMLT(Rl).-CSP) 

GDATA.-(SP) 

0fMT5A,-CSP) 

03, -(SP) 

SP.RO 

CtPNTX 

010, SP 



C*MSG 



.SBTTL ERROR HANOLER -- ERR5 -- WORD SELECT REG. ERRORS 



MOV 


REGNUM, -(SPl 


MOV 


0TXT5. -(SP) 


MOV 


0FMT2, -(SP) 


MOV 


03, -(SP) 


MOV 


SP.RO 


TRAP 


CSPNTB 


ADD 


010, SP 


MOV 


XDATA.-(SP) 


MOV 


BDATA, (SP) 


MOV 


GDATA.-CSP) 



>J 



CNDMCAO DMVll LINE UNIT DIAG1 MACRO M1200 22-rF.B-B4 15:31 PAGE 57-1 
ERROR HANDLER -- ERR5 - WORD SELECT REG. ERRORS 



017224 


012746 


012252 


017230 


012746 


000004 


017234 


010600 




017236 


104414 




017240 


062706 


000012 


4208 017244 


004737 


020160 


4209 017250 






017250 






017250 


104423 




4210 






4211 






4212 






4213 017252 






017252 






4214 017252 


113701 


002412 


4215 017256 


006301 




4216 017260 






017260 


016146 


017010 


017264 


012746 


016607 


017270 


012746 


0.12366 


017274 


012746 


000003 


017300 


010600 




017302 


104414 




017304 


062706 


000010 


4217 017310 


004737 


020134 


4218 017314 






017314 


013746 


002404 


017320 


013746 


002402 


017324 


013746 


002400 


017330 


012746 


011705 


017334 


012746 


000004 


017340 


010600 




017342 


104414 




017344 


062706 


OO0012 


4219 017350 






017350 


012746 


011640 


017354 


012746 


000001 


017360 


010600 




017362 


104414 




017364 


062706 


000004 


4220 017370 






017370 






017370 


104423 




4221 






4222 






4223 






4224 






4225 017372 






017372 






4226 017372 






017372 


C13746 


O02472 


017376 


012746 


015541 


017402 


012746 


012523 


017406 


012746 


000003 


017412 


010600 




017414 


104414 




017416 


062706 


000010 



JSR PC.ERR5* 

ENDMSG 



MOV 
MOV 
MOV 
TRAP 
ADD 
{DUMP THE SELECT REGISTERS 



L 10003: 



TRAP 



.SBTTL ENROft HANDLER -- ERR7A -- USYRT REGISTER ERRORS 

PbNMSG ERR7A 



ERR7A < • 
MOVB REGNW,R1 

ASL Rl jAS PASSED. THIS WAS A BYTE OFFSET 

PRINTB #FMT15,#TXTUR.TXTURT(R1) 



JSR PC.XORGB 

PRINTB 0FMT3,GDATA,BDATA,XDATA 



PRINTB OENOEMB 



ENOMSG 



TRAP 



SEQ 0096 



OfMUO.-CSP) 
04,-CSP) 

SP.RO 
C$PN T B 
#12, SP 



C*MSG 



MOV 


TXTURT(R1),-(SP) 


MOV 


OTXTUR.-(SP) 


MOV 


*FMT15.-CSP) 


MOV 


03, (SP) 


MOV 


SP.RO 


TRAP 


CJPNTB 


ADD 


#10, SP 


MOV 


XDATA.-(SP) 


MOV 


BDATA.-(SP) 


MOV 


GOATA.-CSP) 


MOV 


#FMT3, (SP) 


MOV 


♦4,-(SP) 


MOV 


SP.RO 


TRAP 


CIPNTB 


ADD 


#12. SP 


MOV 


#€NDEMB,~(SP) 


MOV 


#1.-CSP) 


MOV 


SP.RO 


TRAP 


CIPNTB 


ADD 


#4,SP 


L 10004; 





CJMSG 



• SBTTL ERROR HANDLER -- ERR10 — USYRT REG ERROR (XOR, REG PRINTOUT) 



BGNMSG ERR10 

PRINTB 0FMT21 * MXT12 , MPCSR 



ERR10;: 








MOV 


MPCSR. (SP) 




MOV 


#TXT12, (SP) 




MOV 


#TMT21.-(SP) 




MOV 


•3. -CSP) 




MOV 


SP.RO 




TRAP 


CSPNTB 




ADO 


#10, SP 






CNOMCAO DMVU LINE UNIT DlAGl MACRO M1200 ?.?. FFB-84 15:31 PAGE 57-2 
ERROR HANDLER -. ERRiO - - USYRT REG ERROR (XOR, REG PRINTO 



SEQ 0097 



4227 017422 






017422 


012746 


012533 


017426 


012746 


OOOOOl 


017432 


010600 




017434 


104414 




017436 


062706 


000004 


4226 017442 


013701 


002412 


4229 C17446 


00630' 




4230 017450 






017450 


016146 


017010 


017454 


012746 


016607 


017460 


012746 


012732 


017464 


012746 


000003 


017470 


010600 




017472 


104414 




017474 


062706 


OO0010 


4231 017500 


004737 


020134 


4232 017504 






017504 


013746 


002404 


017510 


013746 


002402 


017514 


013746 


002400 


017520 


012746 


012555 


017524 


012746 


000004 


017530 


010600 




017532 


104414 




017534 


062706 


000012 


4233 017540 


004737 


020710 


4234 017544 






017544 






017544 


104423 




4235 






4236 






4237 






4238 






4239 






4240 017546 






017546 






4241 017546 






017546 


013746 


0024 72 


017552 


012746 


015541 


017556 


012746 


012523 


017562 


012746 


0O0003 


017566 


010600 




017570 


104414 




017572 


062706 


000010 


4242 017576 






017576 


012746 


012533 


017602 


012746 


OOOOOl 


017606 


010600 




017610 


104414 




017612 


062706 


000004 


4243 017616 


013701 


002412 


4244 017622 


006301 




4245 017624 






017624 


016146 


016724 


017630 


012746 


016312 


017634 


012746 


012732 



PRINTB 



MOV 
A5L 
PRINTB 



J5R 
PRINTB 



JSR 
ENOMSG 



rtFMT22 

MOV 

MOV 

MOV 

TRAP 

ADD 

REGNUM,R1 

Rl {GET DTR TO USYRT REG ASCII 

*FMT27,*TXTUR,TXTURT(R1) 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 

PC.XORGB {COMPUTE XOR OF GOOD AND BAD DATA 

OFMT23 , GDATA , BDATA , XDATA 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 

PC.ERR12* jGET 6 PRINT USYRT REGISTERS 



#FMT22,-CSP) 
♦1, CSP) 
SP.RO 
CfPNTB 
04, SP 



TXTURTCR1).-(SP'; 

$TXTUR,-(SP) 
*FMT27,-(SP) 

♦3. -CSP) 
SP,R0 
C*PNTB 
*10, SP 



XDATA, -CSP) 

BDATA, (SP) 

GOATA.-CSP) 

<FMT23.-CSP) 

*4,-CSP) 

SP,RO 

CiPNTB 

*12,SP 



LI 0005: 



TRAP 



C$MSG 



.SBTTL ....ERROR HANDLER 



ERR11 



VIA REG ERROR (XOR, REG PRINTOUT) 



BGNMSG ERR 11 

PRINTB 0FKT2 1 , OTXT 12 , MPC SR 



PRINTB 0FMT22 



MOV REGNUM.R1 

ASL Rl 

PRINTB OFMT27,flTXTVR,TXTVRT(Rl) 



ERRlltx 




MOV 


MPCSR.-(SP) 


MOV 


♦TXT12,-(SP) 


MOV 


♦FMT21.-CSP) 


MOV 


*3.-(SP) 


MOV 


SP.RO 


TRAP 


CtPNTB 


ADO 


*10, SP 


MOV 


OFMT22.-CSP) 


MOV 


*l.-(SP) 


MOV 


SP.RO 


TRAP 


CIPNTB 


ADD 


*4 ( SP 


REG ASCII 




MOV 


TXTVRT(Rl), -(SP) 


MOV 


4TXTVR,~(SP) 


MOV 


0FMT27, -(SP) 



-I,w 

I ' .i 



CNDMCAO DMVLL LINE UNIT DIAG1 MACRO M1200 ,'_V f'FB-84 15:51 PAGE 57-3 
, ... ERROR HANDLER -- ERRil -- VIA REG ERROR (XOR. REG PRINTOUT 



SEQ 0098 



4246 
4247 



4248 
4249 



4250 
4251 
425? 
4253 
4254 
4255 

4256 



4257 



4256 
4259 
4260 



017640 
017644 
017646 
017650 
017654 
017660 
017660 
017664 
017670 
017674 
017700 
017704 
01770f, 
017710 
017714 
017720 
017 720 
017720 



4261 
4262 



4263 

4264 
4265 
4266 



017722 
017722 
017722 
017722 
017726 
017732 
017736 
017742 
017744 
017746 
017752 
017752 
017756 
017762 
017764 
017766 
017772 
017776 
020000 
020000 
020004 
020010 
020014 
020020 
020022 
020024 
020030 
020034 
020034 
020034 



012746 
010600 
104414 
062706 
004737 

013746 
013746 
013746 
012746 
012746 
010600 
104414 
062706 
004737 



104423 



013746 
012746 
012746 
012746 
010600 
104414 
062706 

012746 
012746 
010600 
104414 
062706 
013701 
006301 

016146 
012746 
012746 
012746 
010600 
104414 
062706 
004737 



104423 



000003 



OOOOIO 
020134 

002404 
002402 
002400 
012555 
000004 



000012 
020356 



002472 
015541 
012523 
000003 



OOOOIO 

01**533 
000001 



000004 
002412 



017010 
016607 
012732 
000003 



OOOOIO 
020710 



JSR 
PRINTB 



PC , XORGB 
♦FMT23,GDATA,BDATA,XDATA 



MOV 03,-CSP) 
MOV SP,RO 
TRAP CtPNTB 

ADO no,sp 

{COMPUTE XOR OF GOOD AND BAD DATA 



JSR 
ENDMSG 



PC.ERR11* 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 
;GET 6 PRINT VIA REGISTERS 



L 10006: 



TRAP 



.SBTTL ERROR HANDLER -- ERR12 -- USYRT REG ERROR (USrRT PRINTOUT) 

BGNMSG ERR 12 

ERR12:: 

PRINTB 0FMT21.OTXT12.MPCSR 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 



PRINTB $fMT22 



MOV 
ASL 
PRINTB 



REGNUM.R1 

Rl 

*FMT27,0TXTUR I TXTURT(R1) 



JSR 
ENDMSG 



PC.ERR12* 



MOV 

MOV 

MOV 

TRAP 

ADD 

sGET PTR TO USYRT REG ASCII 

MOV 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 
,GET 6 PRINT USYRT REGISTERS 



L 10007: 



TRAP 



XDATA, -CSP) 
BDATA, -CSP) 
GDATA, -CSP) 
OTMT23.-CSP) 
♦4, -CSP; 
SP,R0 
CIPNTB 
♦12, SP 



CiMSG 



MPCSR. -(SP) 

0TXT12, -CSP) 

•FMT21.-CSP) 

♦3.-CSP) 

SP.RO 

CIPNTB 

#10. SP 

♦FMT22. (SP) 
• l.-CSP) 
SP.RO 
CJPNTB 
04, SP 



TXTURTCRn, -CSP) 

OTXTUR, -CSP) 

•FMT27. CSP) 

♦3, -CSP) 

SP.RO 

CfPNTB 

♦10, SP 



C5MSG 



.SBTTL ERROR HANDLER 



ERR13 



TRANSMISSION/TSO ERROR (XOR, REG PRINTOUT) 



! < > 
CNDMCAO DMV11 LINK UN l'l DTAG1 MACRO M1200 ,v i FB 84 15:31 PAGE 57 4 

.... ERROR HANDLER -- ERR13 -- TRANSMISSION/TSO ERROR (XOR, REG 



SEG 0099 



426 7 
4268 

4269 



42 7 
4271 



*.?;2 

42/3 



4274 
42 75 
4276 
4277 
4278 
4279 
4280 
4281 
4282 
4283 
4284 
4285 
4286 
4287 
4288 
4289 
4290 
4291 
4292 
4293 
4294 
4295 
4296 
4297 

4298 



020036 
020036 
020036 
020036 
020042 
020O46 
020052 
020056 
020060 
020062 
020066 
020072 
020072 
020076 
020102 
020106 
020112 
020116 
020120 
020122 
020126 
020132 
020132 
020132 



020134 
020136 
020142 
020150 
020154 
020156 



02C160 
020160 
020160 
020164 
020170 
020174 
020200 
020202 
020204 



013746 
012746 
012746 
012746 
010600 
104414 
062706 
004 737 

013746 
013746 
013746 
012746 
012746 
010600 
104414 
062706 
004737 



104423 



010146 
013701 
013737 
0741'? 

oi2c;. 

000207 



012746 
012746 
012746 
012746 
010600 
104415 
062706 



0024 72 
015541 
012523 
000003 



0000 10 
020134 

002404 
002402 
002400 
012555 
000004 



000012 
020710 



014773 
015076 
011771 
000003 



000010 



BGNMSG ERR 13 

PRINTB #FMT21,#TXT1?,MPCSR 



ERR13: 



JSR 
PRINTB 



PC, XORGB 
OFMT23,GDATA,tiDATA,XOATA 



; COMPUTE XOR OF GOOD AND BAD DATA 



MOV MPCSR,-rSP, 

MOV 0TXT12,-(SPJ 

MOV 0FMT21.-CSP) 

MOV 03, -CSP) 

MOV SP.RO 

TRAP CIPNTB 

ADD 410. SP 



JSR 
ENDMSG 



PC.ERR12* 



iGt'T 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 
C PRINT USrRT REGISTERS 



L10010: 



TRAP 



XDATA. -CSP) 
BDATA, -CSP) 
GOATA, -(SP) 
OFMT23. (SP) 
04 # - ( SP ) 
SP t RO 
CfPNTB 
012, SP 



C$MSG 



.SBTTL ERROR HANDLER SUBROUTINES 

; Sl^ROUTINES USED ONLY BY ERROR HANDLERS 



; 



.SBTTL ERROR HANDLER SUBROUTINE 



XORGB 



PERFORM EXCLUSIVE OR BETWEEN "GDATA" C "BDATA' PUTTING 
THE RESULT IN "XDATA" 



002400 

002402 002404 

302404 



XORGB: 



MOV 


Rl.-(SP) 


{PRESERVE WORKING REGISTER 


MOV 


GDATA,R1 


»GET "GOOO" DATA 


MOV 


BDATA. XDATA 


;AND "BAD" DATA 


XOR 


Rl, XDATA 


{PERFORM EXCLUSIVE OR 


MOV 


(SP)*,R1 


jRESrORE Rl 


RTS 


PC 


iRETURN 



.SBTTL ERROR HANDLER SUBROUTINE -- ERR5t 

j* COMMON ERROR SIEROUTINE TO PRINT SELECT REGISTERS 

ERR5i: 

PRINTX 0FMT4 , 0TXT6 , 0TXT4 

MOV 0TXT4.-CSP) 

MOV 0TXT6.-(SP) 

MOV Of MT4. CSP) 

MOV 03, (SP) 

MOV SP.RO 

TRAP CtPNTX 

ADD 010, SP 



'.J 
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SEQ 0100 



4?99 


020210 






PRINTX 


^EMTll,WSR0,WSR«>,W < jR4,WSRb sOUMP THE SELECT REGISTERS 






020210 


013746 


002264 




MOV 


USR6.-CSP) 




020214 


013746 


002262 




MOV 


WSR4, -CSP) 




020220 


013746 


002260 




MOV 


USR2.-CSP) 




020224 


013746 


002256 




MOV 


WSRO,-CSP> 




020230 


012746 


01234 7 




MOV 


0FMT11. -CSP) 




020234 


012746 


000005 




MOV 


05, -CSP) 




020240 


010600 






MOV 


SP.RO 




020242 


104415 






TRAP 


CIPNTX 




020244 


062706 


000014 




AOO 


014. SP 


4300 


020250 






PRINTX 


<?FMT4B.0TXT4A 






020250 


012746 


015033 




MOV 


0TXT4A.-CSP) 




020254 


012746 


012062 




MOV 


0FMT4B.-CSP) 




020260 


012746 


000002 




MOV 


02, (SP) 




020264 


010600 






MOV 


SP.RO 




020266 


104415 






TRAP 


CIPNTX 




020270 


062706 


000006 




ADD 


06. SP 


4301 


020274 






PRINTX 


*FMTll,WSaiO,WSR12.WSR14,WSRl6 sDUMP THE SELECT REGISTERS 




020274 


013746 


002274 




MOV 


USR16.-(SP> 




020300 


013746 


002272 




MOV 


WSR14.-CSP) 




020304 


013746 


002270 




MOV 


WSR12. -CSP) 




020310 


013746 


002266 




MOV 


USR10. (SP) 




020314 


012746 


012347 




MOV 


•FMTll.-(SP) 




020320 


012746 


000005 




MOV 


05, (SP) 




020324 


010600 






MOV 


SP.RO 




020326 


104415 






TRAP 


CIPNTX 




020330 


062706 


000014 




AOO 


014. SP 


4302 


020354 






PRINTS 


OENDEMB 






020354 


012740 


011640 




MOV 


OtNDEMB, (SP) 




020340 


012746 


000001 




MOV 


#1. -CSP) 




020544 


010600 






MOV 


SP.RO 




020546 


104414 






TRAP 


CIPNTB 




020550 


062706 


000004 




ADD 


04. SP 


4 303 


020354 


000207 




RT5 


PC 




4 304 














4305 














4306 


.SBTTL 


ERROR HANDLER SUBROUTINE -- ERRUI 




4307 














4308 


j COMMON 


ERROR SUBROUTINE TO GET/PRINT VIA REGISTERS 




4309 














4310 


020356 


004757 


004502 


ERR11*: J5R 


PC.GETVRS jGET VIA REGS FOR PRINTOUT 




4311 


020562 






PRINTX 


0FMT24.0TXT16.0TXT17 






020562 


012746 


015717 




MOV 


0TXT17, -CSP) 




020566 


012746 


015704 




MOV 


0TXT16.-CSP) 




020572 


012746 


012634 




110V 


OFMT24. (SP) 




020376 


012746 


000003 




MOV 


05. (SP) 




020402 


010600 






r-ov 


SP.RO 




02O404 


104415 






^RAP 


CIPNTX 




020406 


062706 


000010 




ADO 


010, SP 


4312 


020412 






PRINTX 


OFMT25,VREGS*0»VREGS*2,VREGS*4,VREGS*6 






020412 


013746 


002544 




MOV 


VREGS»6, (SP) 




020416 


013746 


002542 




MOV 


VREGS*4, (SP) 




020422 


013746 


002540 




MOV 


VREGS*2,-(SP) 




020426 


013746 


002336 




MOV 


VREGS^O.-(SP) 




0204 32 


012746 


01264 7 




MOV 


OFMT25.-CSP) 




020436 


012746 


000005 




MOV 


05. -CSP) 




020442 


010600 






MOV 


SP.RO 
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4313 



4314 



4315 



4316 



4317 



4318 



4319 
4320 
4321 
4322 



020444 
020446 
020452 
020452 
020456 
020462 
020466 
020470 
0204 72 
0204 76 
020476 
020502 
020506 
020512 
020516 
020522 
020526 
020530 
020532 
020536 
020536 
020542 
020546 
020552 
020554 
020556 
020562 
020562 
020566 
020572 
020576 
020602 
020606 
020612 
020614 
020616 
020622 
020622 
020626 
020632 
020636 
020640 
020642 
020646 
020646 
020652 
020656 
020662 
020666 
020672 
020676 
020700 
020702 
020706 



104415 
062706 

012746 
012746 
012746 
010600 
104415 
062706 

013746 
013746 
013746 
013746 
012746 
012746 
01C600 
104415 
062706 

012746 
012746 
012746 
010600 
104415 
062706 

013746 
013746 
013746 
013746 
012746 
012746 
010600 
104415 
062706 

012746 
012746 
012746 
010600 
104415 
062706 

013746 
013746 
013746 
013746 
012746 
012746 
010600 
104415 
062706 
000207 



000014 

015754 
012741 
000002 



000006 

002354 
002352 
002350 
002346 
012677 
000005 



000014 

016015 
012741 
000002 



000006 

002364 
002362 
002360 
002356 
01264 7 
000005 



000014 

016051 
012741 
000002 



000006 

002374 
002372 
002370 
002366 
012677 
000005 



000014 



PRINTX #FMT29 #TXT18 



PRINTX #FMT26,VREGS»8. .VREGS+10. ,VREGS*12. ,VREGS*14 



PRINTX #FMT29,#TXT19 



PRINTX #FMT25 , VREGS ♦ 16 . , VREGS ♦ 18 . , VREGS * 20 . , VREGS ♦ 22 



PRINTX #FMT29,#TXT20 



PRINTX #FMT26,VREGS*24. , VREGS*26. , VREGS*28 . . VREGS*30 



RTS 



PC 





SEQ 0101 


TRAP 


CIPNTX 


ADD 


#14, SP 


MOV 


#TXU8. -CSP) 


MOV 


#FM?29. -(SP) 


MOV 


#2 , ( SP ) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


#6.SP 


MOV 


VREGS. 14. ,-CSP) 


MOV 


VREGS»12.,-CSP) 


MOV 


VREGS»10..-(SP) 


MOV 


VREGS, 8. , -CSP) 


MOV 


#FMT26.-(SP) 


MOV 


#5 . - ( SP ) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


#14. SP 


MOV 


#TXT19, -(SP) 


MOV 


#FMT29.-(SP) 


MOV 


#2. -CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


#6,SP 


MOV 


VREGS*22,.-(SP) 


MOV 


VREGS*20. , -CSP) 


MOV 


VREGS*18.,-(SP) 


MOV 


VREGS»16. , (SP) 


MOV 


#fMT25. -CSP) 


MOV 


#5. -CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


#14. SP 


MOV 


#TXT20. -(SP) 


MOV 


#FMT29.-(SP) 


MOV 


#2. -CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADO 


#6,SP 


MOV 


VREGS»30.,-(SP) 


MOV 


VREGS*28. , -CSP) 


MOV 


VREGS*26. , (SP) 


MOV 


VREGS*24.. -CSP) 


MOV 


#TMT26, (SP) 


MOV 


#5. -CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADD 


#14. SP 



.SBTTL ERROR HANDLER SUBROUTINE - ERR12I 



' ) 
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4323 
4324 
4325 
4326 

4327 



4328 



4329 



4330 



4331 
4332 
4333 



020710 C04737 004402 

020714 



020714 
020720 
020724 
020730 
020734 
020736 
020740 
020744 
020744 
020750 
020754 
020760 
020764 
020770 
020774 
020776 
021000 
021004 
021004 
021010 
021014 
021020 
021022 
021024 
021030 
021030 
021034 
021040 
021044 
021050 
021054 
021060 
021062 
021064 
021070 



012746 
012746 
012746 
012746 
010600 
104415 
062706 

013746 
013746 
013746 
013746 
012746 
012746 
010600 
104415 
062706 

012746 

012746 

012746 
010600 
104415 
062706 

013746 
013746 
013746 
013746 
012746 
012746 
010600 
104415 
062706 
000207 



015604 
015567 
012634 
000003 



000010 

002324 
002322 
002320 
002316 
01264 7 
000005 



000014 

015642 
012741 
000002 



000006 

002334 
002332 
002330 
002326 
012677 
000005 



000014 



ERR12S: JSR 

PRINTX 



COMMON ERROR ROUTINE TO GET AND PRINTOUT uSYRT REGISTERS 

jGET USYRT REGS FOR PRINTOUT 



PC.GETURS 
0FMT24,0TXU3,0TXT14 



PRINTX 0FMT2S,UREGS*0,UREGSf2,UREGS*4,UREGS>6 



PRINTX 0FMT29.OTXT15 



PRINTX 0FMT26,UREGS*10.UREGS*12.UREGS*14,UREG5*16 



RTS 



PC 



SEQ 0102 



MOV 


0TXT14, -CSP) 


MOV 


0TXT13, -(SP) 


MOV 


0FMT24, (SP) 


MOV 


03. -CSP) 


MOV 


SP,RO 


TRAP 


CiPNTX 


ADD 


$10, SP 


MOV 


UREG5*6,-(SP) 


MOV 


UREGS*4, -CSP) 


MOV 


UREG$*2.-(SP) 


MOV 


UREGS'O, (SP) 


MOV 


OFMT25, -(SP) 


MOV 


♦5. -(SP) 


MOV 


SP.PO 


TRAP 


CiPNTX 


ADD 


#14, SP 


MOV 


♦TXT 15. CSP) 


MOV 


Of MT29.-CSP) 


MOV 


02. -CSP) 


MOV 


SP.RO 


TRAP 


CIPNTX 


ADO 


06, SP 


MOV 


UREGSU6.-1SP) 


MOV 


UREGSU4.-CSP) 


MOV 


UREGS*12,-CSP) 


MOV 


UREGSUO. (SP) 


MOV 


Of MT26, -CSP) 


MOV 


05. -(SP) 


MOV 


SP.RO 


TRAP 


OPNTX 


ADD 


014 ,SP 
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LOAD DEVICE PROTECTION TABLE 



SEG 0103 



4335 
4336 
433? 
4338 
4339 
4340 
4341 
4 542 

4343 
4 344 
4345 
4346 



021072 
021072 
021072 
021074 
021076 
021100 



SBTTL LOAD DEVICE PROTECTION TABLE 

///////////////////////////////////////////////////////////////////////////// 
/ THIS TABLE IDENTIFIES THE LOAD DEVICE TO THE SUPERVISOR, SO THAI IT CAN BE 
/ PROTECTED FROM TESTING, IF DESIRED. 



177777 
177777 
177777 



BGNPROT 

.WORD 
.WORD 
.WORD 
ENDPROT 



-1 

1 

-1 



{DON' T CHK CSR ADRS 

j DON'T CHK MASSBUS UNIT NO. 

jDON'T CHK DRIVE NO. 



L5PR0T 



CNDMCAO OMV11 LINE UNIT DIAGl 

INITIALIZE SECTION 



4548 
4549 
4550 
4551 
4552 
4355 
4354 
4555 



MACRO M1200 22 -FEB -84 I5j31 



N8 

PAGE 59 



SEQ 0104 



4356 
4357 



4358 
4359 
4360 
4361 
4362 
4363 
4564 
4365 
4366 
4367 
4368 
4369 
4370 
4371 
4.J72 
4373 
4374 
4375 
4376 
4577 



4378 

4379 
4380 
4381 



4382 

4383 
4384 
4385 



43G6 

4387 
4388 



021100 
021100 

021100 
021100 
021104 
021110 
021114 
021120 
021122 



021126 
021132 
021136 
021142 
021146 
021152 
021156 
021160 
021166 
021174 

021176 
021204 



.SBTTL INITIALIZE SECTION 

\/ ///////////////////////////////////////////////////'////// ////////// 
;/ THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED 
;/ AT THE BEGINNING OF THE TEST SEQUENCE ON HE NEXT UNIT. 
\///////// //////////////////////////////////, ///////////////////////// 

BGNINIT 



021220 
021220 
021224 
021226 
021226 



021230 
021230 
021234 
021236 
021236 



021240 
021240 
021244 
021246 
02X246 



012746 
012746 
012746 
012746 
104437 
062706 



010637 
005037 
005037 
005037 
005037 
005737 
001007 
013737 
013737 
000406 

013737 
013737 



000340 
170000 
000140 
000003 

000010 



002414 
002420 
002454 
002452 
002456 
002444 

000004 
000006 



002446 
002450 



SE TVEC 4140 , 4170000 , 4340 



}0DT ROM ADDRESS 



LilNlT:: 




i 


;JB REV A-0 


MOV 


4340, -CSP) 


MOV 


4170000, -CSP) 


MOV 


4140. -CSP) 


MOV 


43, -CSP) 


TRAP 


C*SVEC 


ADD 


410, SP 



002446 
002450 



000004 
000006 



6$: 



021212 012737 000001 002444 9$: 



MOV 


SP.PSTACK 


CLR 


SUBRPC 


CLR 


CHPTYP 


CLR 


ERROR 1 


CLR 


SAVLEN 


TST 


FRSTIM 


BNE 


6$ 


MOV 


S)44,5AVE4 


MOV 


846.SAVE6 


BR 


9$ 


MOV 


SAVE4.Q44 


MOV 


SAVE6.S46 


MOV 


41, FRSTIM 



{SAVE BASE-LEVEL STACK POINTER 

{CLEAR SUBR CALL PC 

{CLEAR USYRT CHIP TYPE INDICATOR 

{CLEAR ERROR FLAG 

{CLEAR CHAR LENGTH FROM SETUP 

{SEE IF FIRST TIME THROUGH AFTER LOAD 

{BR IF NOT 

{SAVE ERROR TRAP VECTOR 



{RESTORE ERROR TRAP VECTOR 



{MARK FLAG FOR NEXT TIME THROUGH 



012700 
104447 

103415 



012700 
104447 

1034 11 



012700 
104447 

103411 



000040 



{SEE IF PROGRAM JUST STARTED, BR IF YES 
READEF 4EF. START 



BCOMPLETE 



STARST 



000037 



;SEE IF PROGRAM JUST RESTARTED, BR IF YES 
READEF 4EF. RESTART 



BCOMPLETE 



STARST 



000035 



{SEE IF THIS IS A NEW PASS, BR IF YEC 
READEF 4EF.NEW 



BCOMPLETE Nl-WST 
{SEE if PROGRAM WAS JUST CONTINUED 



MOV 
TRAP 

acs 



MOV 
TRAF 

BCS 



MOV 

TRAP 

BCS 



4EF. START, RO 
C$REFG 

STARST 



4EF. RESTART, RO 
C$RE.F<3 

STARST 



4EF.NEW,R0 
CJREFG 

NEWS! 



CNOMCAO DMVll LINE UNH DIAG1 
INITIALIZE SECTION 



4 589 



4 590 

4591 
4 592 
4593 
4594 
4595 
4596 
4597 
459a 
4599 
4400 
4401 
4402 
4403 
4404 
4405 
4406 
4407 



440a 

4409 
4410 
4411 
4412 
4413 
4414 
4415 
4416 
4417 
4418 
4419 
4420 
4421 
4422 
4423 
4424 
4425 
4426 
4427 
442fl 
4429 
44 50 
4431 
4432 
4433 

4434 

4435 
44 36 
4437 



021250 
021250 
021254 
021256 
021256 
021260 

021262 
021262 



021266 
021272 
021272 
021300 
021304 



021312 
021312 
021316 
021316 
021322 
021524 
021326 
021526 
021350 
021354 
021356 
021544 

02135O 
021352 

021356 
021560 
021562 
021566 



021370 
021574 
02140O 
021406 
021412 
021416 
021422 
021426 
021432 

021456 
021456 
021440 
021442 
021444 

021446 



012700 000036 
10444 7 

105473 
000414 



005037 002466 



005057 002460 



012757 

005257 
012737 



005257 

015700 
104442 
010001 

105403 
0O6357 
000 766 
053737 
006557 

012102 

012705 

010225 
005202 
022705 
001375 



011157 
012137 
062737 
012157 
012157 
012157 
012157 
012157 
011157 



104453 
0050O0 
000240 
077002 



V i 

MACRO M1200 22 rF.B-84 IS (31 PARK 59 1 

RF.ADFF 0Fr .CONTINUE 

BCOMPt.F.TE FNDIT 
BR GETPRM 



STARST? 



Cl.R 



STARFS 



MOV 
TPAP 

BCS 



lCl.fr.AR FLAG TO SHOW JUST HAD STA OR PES 



SEO 0105 



0fF .CONTINUF..RO 
CIRFFG 

ENDIT 



177777 
002466 
000001 



002410 
002410 

002462 

002462 
002462 

0024 72 
002552 



002552 
002554 
O0O0O4 
002556 
002540 
0O2542 
002544 
002546 
002550 



002410 
002462 



iCLFAR DfcVICE MAP 

CLR DEVMAP 

NEWSTj 

MOV «-l. LOGDEV 

INC STARFS 

MOV 0GITO, DEVPTR 

i GET UNIBUS ADDRESS. VECTOR, 
t CONNECTOR INFORMATION TOR 
GETPRM: 

INC LOGDEV 
GPHARD LOGDEV # R1 



-RESET LOGICAL DEVICE TO 1 

» INCREMENT NO. OF PASSES SINCE STA OR RES 

lINIT DEVICE MAP BIT POINTER 

PRIORITY LEVEL, SWITCH PACKS. TEST 
THIS LOGICAL DEVICE 



j INCREMENT LOGICAL DEVICE NL**ER 
jGET P-TABLE POINTER INTO Rl 



BCOMPLETE 



101 



002460 101: 



111: 



002534 



i ISSUE 

151: 

LNOlTi 



ASL 

BR 

BIS 

ASL 

MOV 
MOV 

MOV 
INC 
CMP 
BNE 



MOV 
MOV 
ADO 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
LSI BUS 
BRESET 

CLR 
NOP 
SOB 



DEVPTR 
GETPRM 

DEVPTR , DEVMAP 
DEVPTR 

(R1)*,R2 

♦MPCSR.R5 

R2,(R3)» 
R2 

#6SEL17»2,R5 
11$ 



(Rl).MPIVEC 
(Rl)^.MPOVEC 
♦4.HP0VEC 
(Ri)».MPRIOR 
(R1)»,LUSUI1 
(R1)»,LUSWI2 
(R1)*,BRDTYP 
(R1)*,TSTC0N 
(Rl). BORATE 
RESET, TO INXT 



MOV 
TRAP 

MOV 

BCS 



RO 
RQ»l5f 



tBR IF DEVICE AVAILABLE 

jSHIFT DEVICE POINTER 
iSKIP THIS DEVICE 
■SET BIT FOR THIS DEVICE 
•SHIFT BIT POINTER 



IR2-CSR ADOR VALUE 

jR5-P0INTER TO CSR ADOR STORAGE AREA 

iPUT CSR ADORESSES IN 'BSEL' AREA 

i BUMP BSEL AOOR 

I ALL 16 AO0«ESSES MOVED ? 

iNO: DO ANOTHER ADORESS 

I YES: CONTINUE 

iGET DMV11 INPUT INTRPT VECTOR 

,-GET DMVU OUTPUT INTRPT VECTOR 
jGE DMV11 DEVICE PRIORITY 
»GET LU SWITCH PACK #1 
jGf T LU SWITCH PACK #2 
l GET DMV-11 BOARO TYPE 
iGET TEST CONNECTOR INOICATOR 
i GET BAUO RATE FOR THIS DEVICE 
QMV11 

TRAP 
j* TIME DELAi TO ALLOW COMPU TXUN 
iO QF' DMVii MXCR001ACNOSTXCS. 
I* 



LOGDEV. RO 

CIGPHRD 

R0.R1 

10$ 



C4RE5EI 



\ 



CNDMCAO ONvll I. INI UN II UIAGl 
INITIALIZE SECTION 



MACRO M1200 



4450 CUH446 
(V1446 
0?1446 



HB-tt4 1Sj31 PAGE 59 t? 



ENDINIT 



SEC* OKjf, 



1044H 



LlOOl^j 



TRAP CHNIT 



CNOMCAO fJMVll LINE UNH DIACil 
AUTO DROP UNIT SECTION 



4440 
4441 
4 44<? 
4445 
4444 
4445 
4446 
4447 
4448 
4449 
4450 
4451 
445,? 
445-' 
4454 
4455 
4456 



4457 
4458 



4459 
4460 
4461 
4462 
4463 
4464 
4465 
4466 
4467 
4468 
4469 
4470 
4471 
4472 
4473 
4474 



4475 
4476 

4477 



44 78 
4479 

4480 
4481 



4482 
4483 



021450 
021450 

021450 
021450 
021454 
021460 
021464 
021470 
021472 
021476 
021502 
0215O6 

021512 
021514 
021516 

021520 
021524 
021530 
021532 
021534 
021536 

021540 
021540 
021544 
021546 
021552 
021554 
021554 
021560 



021564 
021564 
021564 

021566 



012746 
012746 
012746 
012746 
104437 
062706 
005037 
012702 
013703 

105723 
006302 
103375 

013703 
012702 
005723 
006302 
00630? 
103374 



012700 
104436 
005737 
001403 

013700 
104451 



021562 000240 



104461 
050237 



OOOOOO 
021566 
00OO04 
000003 

OOOOIO 
002622 
000001 
002472 



0024 72 
000001 



000004 
002622 

002410 



MACRO M1200 cV FFB-84 VnSl 



[)'■» 

PAGE 60 



SEQ 010/ 



,SBTTL. AUTO DROP UNIT SECTION 

\/ THE AUTO OROP CODING DETERMINES WHETHER OR NOT THE DEVICE WHOSE P- TABLE 
}/ WAS JUST OBTAINED IS READY FOR TESTING, AND IT IS DROPPED IF NOT READY. 



♦ ♦* 



THIS ALGORITHM IS THE SAME A CNOMA TEST 1 EXCEPT THAT TEST 
WILL JUST REPORT THE FAILURE AND GO ON - • THIS ROUTINE WILL CAUSE THE 
DEVICE TO BE DROPPED IF A BUS-TIMEOUT OCCURS WHEN ANY OF THE CSR' S 
ARE ACCESSED WITH EITHER A "TST" OR "TSTB" INSTRUCTION. 

UGNAUTO 



SETVEC 04,*AD.HIT,00 



1$ 



2* 



CLR 


TMPO 


MOV 


♦ 1.R2 


MOV 


BSEL0.R3 


TSTB 


CR3)* 


ASL 


R2 


BCC 


11 


MOV 


BSEL0.R3 


MOV 


• 1.R2 


TST 


(R3)* 


ASL 


R2 


ASL 


R2 


BCC 


2$ 



CLRVEC 04 



AD . OK : 



002622 



AD. HIT 



TST 
BEQ 
DODU 


TMPO 
AD. OK 
LOGDEV 


NOP 




ENOAUTO 




BIS 


R2.TMP0 



PQ, -CSP) 
*AD.HIT, -CSP) 
04 , ~ ( SP ) 
#3. -CSP) 
CISVEC 
#10. SP 



LIAUTO: : 

} SETUP INVALID-ADDRESS TRAP VECTOR 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 

j INITIALIZE TRAP FLAG REGISTER 

,FLAG BIT 

»INIT ADDRESS POINTER 

j ACCESS THE CSR'S BY BYTES. 



jRE-INIT ADDRESS POINTER 

jRE-INIT FLAG BIT 

j ACCESS THE CSR'S BY WORDS. 



iRESTORE THE VECTOR TO OS 

MOV 04. RO 

TRAP CiCVEC 

jDID WE GET HIT WITH AN INVALID ADDRESS TRAP? 

f N0, EXIT TEST 

j YES, DROP THIS LOGICAL DEV. 

MOV LOGDEV, RO 

TRAP CtDOOU 



»(FOR PATCHING IN A HALT IF NECESSARY) 

L10013: 
I FLAG THE HIT IF WE GET IT! 



TRAP 



C*AUTO 



CNOMCAO DMVIL LINE UNH DIAGl MACRO M1200 22 fF.B-84 15:31 PAGE 60 1 

SEQ 0108 
AUTO DROP UNIT SECTION 

4484 021572 000002 RTI i RETURN 

4485 



r 9 

CNOMCAO DMVll LINE UNIT DIAG1 MACRO M1200 22-FEB-84 13:31 PAGE 61 
CLEANUP CODING SECTION 



SEQ 0109 



4487 
4488 
4489 
4490 
4491 
4492 
4493 
4494 

4495 
44% 
4497 



SBTTL CLEANUP COOING SECTION 

///////////////////////////////////////////////////////////////////// 
/ THE CLEANUP COOING SECTION CONTAINS THE CODING THAT IS PERFORMED 
/ AT THE END OF THE TEST SEQUENCE ON A PARTICULAR UNIT, 
///////////////////////////////////////////////////////////////////// 



021574 
021574 



021574 
021574 
021574 104412 



BGNCLN 



ENDCLN 



L*CLEAN; 



L10014: 



TRAP 



CSCLEAN 



CNOMCAO DMVli LINE UNIT DIAG1 MACRO M1200 22 fEB-84 15:31 PAGE 62 
DROP UNIT SECTION 

4499 .SBTTL OROP UNIT SECTION 

4500 

4501 ;///////////////////////////////////////////////////////////////////////////// 

4502 j/ THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 

4503 ;/ TO NO LONGER BE TESTED. 

4504 j ///////////////////////////////////////////////////////////////////////////// 
4505 

4506 021576 BGNDU 

021576 L$DU:: 

4507 ;ISSUE UNIBUS RESET TO CLEAN UP 

4508 021576 BRESET 

021576 104433 TRAP CSRESET 

4509 021600 ENDDU 

021600 L10015: 

021600 104453 TRAP C$DU 



SEQ 0110 



-H 



CNOMCAO DMVU L INfc UNIT DIAG1 
ADD UNIT SECTION 



4511 
451? 
4513 
4514 
4515 
451b 
4517 
4518 
4519 



MACRO M1200 22 TF.B-84 15:31 PAGE 63 



SBTTL ADD UNIT SECTION 

//////////////////////////////////////////////////// '///// ///////////// ////// 

/ THE ADD -UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 

/ TO BE (A) TESTED FOR THE FIRST TIME. OR (B") RESUMED IN TESTING. IF 

/ "EF.AUNIT" IS SET, THE UNIT WIl.l. BE TESTED AS A NEW UNIT. 

///////////////////////////////////////////////////////////////////////////// 



SEQ 0111 



4520 



4521 



021602 
021602 
021602 
021602 
021602 



BGNAU 
ENDAU 



104452 



L$AU;; 
L10016; 



TRAP 



C$AU 



I ( * 

CNDMCAO 0MV11 LINE UNIT DIAG1 MACRO M1200 2c? FEB -84 15: 31 PAGE. 65 
TEST 1 - TBMT MICROCODE INTERRUPT TEST 

4531 .SBTTL TESf 1 - TBMT MICROCODE INTERRUPT TEST 



SEQ 0112 



4532 
4533 

4534 
4535 

4536 



4537 
4538 
4539 
4540 
4541 

4542 



454J 
4544 
4545 
4546 
4547 
4548 
4549 
4550 
4551 
4552 
4553 
4554 
4555 
4556 



021604 

021604 
021610 
021612 
021612 
021614 
021614 
021616 

021620 
021624 
021626 
021630 
021630 
021632 
021632 
021634 



4557 



4558 
4559 



021644 
021646 
021652 
021654 

021656 
021664 

021666 
021672 
021700 

021700 
021702 
021704 
021706 
021710 
021710 
021712 



004737 
103003 

104460 

104410 
000144 

004537 
000110 
103003 

104460 

104410 
000126 



021636 012777 



010346 
012703 
077301 
012603 

132777 
001013 

004737 

012737 



104455 
000047 
013235 
01/030 

104410 
000050 



* 

* TtST 1 -- TBMT MICROCODE INTERRUPT TEST 

* 
+ 

* 
* 

. .++****+**********♦****+* *****#** + + *+ + ****♦* + + ***+* + *** + ****** + **** + ***** + * + 

BGNTST 

Tl: : 



THIS TEST CHECKS THE OPERATION OF THE TBMT CIRQ) INTERRUPT. 
THIS IS DONE BY ISSUEING THE "SET MAINTENANCE INTERRUPT FLAG ANO CLEAR 
INTERRUPT DISABLE IN PROCESSOR STATUS" COMMAND WHILE IN THE MAINTENAfv ! 
LOOP AND THEN CHECKING FOR BIT 7 OF BSEL3 TO BE SET C THE BIT IS SET 
BY THE MICROCODE WHEN THE TBMT INTERRUPT OCCURS). 



003374 



005432 



000007 160632 
000050 

0O0200 160612 



1$ 



004210 
000007 



002400 



JSR 


PC.MSTCLR 


j PUT THE MICROPROCESSOR IN THE MAINTENANCE LOOP 


BCC 


.♦8, 


;IF NO ERROR, PROCEED 




ERROR 




» ELSE, REPORT IT AND 








TRAP 


CiERROR 


ESCAPE 


TST 


{ EXIT THIS TEST 








TRAP 


CIESCAPE 






.WORD 


L10017-. 


JSR 


R5.CKUSTS 


jCHK USYRT STATUS FOR INIT STATE 




110 




jTBMT-1. TSO-1 




BCC 


.♦8. 


ilf ERROR, PRINT REPORT 




ERROR 









ESCAPE TST 



MOV 

MOV 
MOV 
SOB 
MOV 

BITB 
BNE 

JSR 
MOV 
GEDF 



{ ANO SKIP REMAINDER OF TEST 



TRAP 

TRAP 
.WORD 



C*ERRO« 

C*ESCAPE 
L10017-. 



*00TBMT,aSEL2 i ISSUE "TBMT TEST" COMMAND 

{WAIT FOR THE M-LOOP TO FINISH THE OPERATION 



R3.-CSP) 
♦40.. R3 
R3.1I 
CSP)*,R3 



*MRDY,8BSEL2 
5* 

PC.GETWSR 

♦OOTBMT.GDATA 

EM4,ERR4 



ESCAPE TST 



,"MRDY» SHOULD BE HIGH BY NOW. 
jBR IF NO ERROR 

{GET SELECT REGISTERS 
{IDENTIFY REQUESTED FUNCTION 
{REPORT "MRDY" TIMEOUT ERROR... 
j "DEVICE FATAL" ERROR * 39 

TRAP 
.WORD 
.WORD 
.WORD 



021714 004737 004210 



5* 



JSR 



PCGETWSR 



iAND EXIT TEST 



jGLT CURRENT REGISTER CONTENTS 



TRAP 
♦ WORD 



C*ERDF 
39 
EM4 
ERR4 

CSESCAPE 
L10017-. 



I' 4 



CNDMCAO DMV11 LINE UNIT OIAG1 MACRO M1200 
TEST 1 - TBMT MICROCODE INTERRUPT TEST 

023 727 002260 100200 



FEB -84 1^:31 PAGE 65 1 



4560 021720 

4561 

4562 

4563 021726 

4564 

4565 021730 

4566 021736 

4567 021744 

4568 021752 

021752 
021754 
021756 
021760 



4569 
4570 



4571 



021762 
021762 
021762 



001415 

012737 
013737 
012737 



104455 
000050 
014323 
017154 



104401 



CMP 



8EQ 



100200 002400 
002260 002402 
000002 002412 



SEQ 0113 



WSR2, 0100200 



7$ 



jCOMPARE BYTE SELECT REGISTERS 2 AND 3 
jREG 2 - 200 -- "MRD'" SET/COMMAND CLEARED 
jREG 3 • 200 -- "TBMT" INTERRUPT BIT SET 
5 BR IF NO ERROR. 



7$ 



MOV 


4100200. GDATA 


GET THE 


GOOD DATA 




MOV 


WSR2.BDATA 


GET THE 


BAD DATA 




MOV 


02.REGNUM 


GET THE 


REGISTER NUM6ER 




GEDF 


EM92.ERR5 


REPORT 


'TBMT INTERRUPT FAILURE" ERROR. 

'DEVICE FATAL" ERROR « 40 

TRAP 
.WORD 
.WORD 
.WORD 


C5ERDF 
40 

EM92 
ERR5 


ENDTST 






L10017; 





TRAP 



C*ETST 



CNDMCAO DMV11 LINE UNIT DIAG1 
TEST 2 -• SWITCH SETTING TEST 
4585 



MACRO MI200 22 -FEB -84 15; 31 PAGE 66 



.SBTTL TEST 2 



SWITCH SETTING TEST 



SEQ 0114 



4586 

4587 
4588 



4589 
4590 
4591 
4592 
4593 
4594 
4595 
4596 
4597 
4598 
4599 
4600 
4601 
4602 



4603 

4604 
4605 
4606 



4607 
4608 



4609 



021764 
021764 

021770 
021770 
021770 
021772 
021776 
022000 
022002 
022006 
022010 

022012 
022020 

022022 

022030 

022032 

022032 
022034 
022036 
022040 
022042 
022042 

022044 
022046 
022046 
022046 

022050 
022050 
022050 
022052 



004737 005420 



104402 
004537 
121400 
000000 
004537 
121000 

oooooo 

123737 
001004 

123737 
001405 



104455 
000051 
022402 
022152 

104406 

000240 

104403 



104402 
005737 



003610 
003610 

022000 
022010 



002542 



002540 



* TEST 2 -- SWITCH SETTING TEST 

* 

* SUBTEST «1: 

* THE TWO READABLE SWITCH PACKS WILL BE SAMPLED AND COMPARED AGAINST THE 2 

* VALUES IN THE P-TABLE. AN ERROR IS REPORTED ON A MISMATCH. 

♦ 

* SUBTEST *2; 

* THE SPEED SELECT SWITCH (SPDSEL) IS READ VIA THE VIAORA REGISTER (BIT PA4 ) 

* ANO COMPARED AGAINST THE BAUD RATE VALUE IN THE P-TABLE, IF A MISMATCH 

* OCCURS IT WILL BE REPORTED. NOTE: THIS SUBROUTINE IS NOT RUN IF AN M8064 

* BOARD IS BEING TESTED (IT ONLY RUNS 356K . . . MAKING A SPEED SWITCH USELESS). 

* 



BGNTST 

JSR PC.INIDMV 



T2r; 
jINIT DMV-11 (MA1NT LOOP) 



BGNSUB 



JSR 
.WORD 

T3.SW1: .WORD 
JSR 
.WORD 

T3.SW2i .WORD 

CMPB 
BNE 

CMPB 

BEQ 

T3.ERRt GEDF 



T2.1: 



R5.READI 

SWPDDCMP 



R5.READI 

SWPBOT 



T3.SW1.LUSWI2 
T3.ERR 

T3.SW2.LUSWI1 
T3.0K 

T3.EHD.T3.EM1 



TRAP 



CSBSUB 



CKLOOP 



T3.0K: NOP 

ENDSUB 



;GET "DDCMP ADDRESS" 

j (IT WILL BE PUT HERE) 
jGET "BOOT ADDRESS" 

l (IT WILL BE PUT HERE) 

j* DOES "DDCMP ADDRESS" MATCH P-TABLE VALUE 
I NO, REPORT ERROR 

i* DOES BOOT ADDRESS" MATCH P-TABLE VALUE 
}N0, REPORT ERROR 

jREPORT SWITCH SETTINGS DON'T MATCH P-TABLE 

j "DEVICE FATAL' 1 ERROR 41 

TRAP C*ERDF 

.WORD 4 1 
.WORD T3.EH0 
.WORD T3.EM1 



TRAP 



C$CLP1 



L10021: 



TRAP C$ESU6 



002544 



BGNSUB 



TiT 



T2.2: 



BRDTYP 



{IS THIS AN (18064 ? 



TRAP C$BSU6 



CNDMCAO DMV11 LINK UNIT D1AG1 
TEST 2 -- SWITCH SETTING TEST 



4610 


022056 


001433 




4611 


022060 


004537 


003610 


4612 


022064 


120017 




4613 


022066 


000000 




4614 


022070 


103003 




4615 


022072 








022072 


104460 




4616 


022074 








022074 


104410 






022076 


000050 




4617 


022100 


142737 


000357 


4618 


022106 


1C6237 


022066 


4619 


022112 


106237 


022066 


4620 


022116 


106237 


022066 


4621 


022122 


106237 


022066 


4622 


022126 


123737 


022066 


4623 


022134 


001404 




4624 








4625 


022136 








022136 


104455 






022140 


000052 






022142 


022700 






022144 


02234* 




4626 


022146 
022146 








022146 


104403 




4627 








4628 


022150 
022150 








022150 


104401 




4629 








4630 


022152 
022152 






4631 


022152 








022152 


012746 


022426 




022156 


012746 


000001 




022162 


010600 






022164 


104414 






022166 


062706 


000004 


4632 


022172 








022172 


012746 


022513 




022176 


012746 


000001 




022202 


010600 






022204 


104415 






022206 


062706 


000004 


4633 


022212 








022212 


012746 


022542 




022216 


012746 


000001 




022222 


010600 






022224 


104415 






022226 


062706 


000004 


4634 


022232 








022232 


013746 


002540 




022236 


013746 


002542 




022242 


012746 


022573 




022246 


012746 


000003 











L <* 


MACRO M1200 


22 


•TFB-84 


15; 31 PAGF 66-1 




1$: 




BEQ 

JSR 

VIAORA 

000 

BCC 

ERROR 

ESCAPE 


10$ 

R5.READI 

. *8, 
SUB 


022066 
002550 






BICB 
ASRB 
ASRB 
ASRB 
ASRB 
CMPB 
BEQ 

GEDF 


0357,1$ 

1$, BORATE 
10$ 

T3.6.T3.EM2 



SEQ 0115 



! IF YES: THEN SKIP THIS SUBROUTINE 
{GET VIAORA REGISTER 

{STATUS WORD GOES HERE 



TRAP 

TRAP 
.WORD 
{CLEAR ALL BUT SPEED SELECT BIT(PA4^ 
{RIGHT JUSTIFY SPDSEL SWITCH BIT FOR 
} COMPARISON WITH OPERATOR'S REPLY 



{IS THE SWITCH IN THE DESIRED POSITION? 
i IF YES; END THE SUBROUTINE/TEST 



{REPORT ERROR 

j "DEVICE FATAL" ERROR 



CSERROR 

C*ESCAPE 
L 10022 -. 



10$: ENDSUB 



T3.END: ENDTST 

BGNMSG 
PRINTB 



T3.EM1 

0T3.1 



{PRINT ERROR MESSAGE 



PRINTX 0T3.2 



PRINTX 0T3.3 



PRINTX 0T3.4.LUSWI2.LUSWI1 



RROR 


42 
TRAP 
.WORD 
.WORD 
.WORD 


CIERDF 

42 

T3.6 

T3.EM2 


L10022: 


TRAP 


C$ESU6 


L 10020: 


TRAP 


C$ETST 


T3.EM1: 


« 






MOV 

MOV 

MOV 

TRAP 

ADD 


•T3.1.-CSP) 
♦1, -CSP) 
SP.RO 
CJPNTB 
04, SP 




MOV 

MOV 

MOV 

TRAP 

ADD 


OT3.2. -(SP) 
#1, (SP) 

SP.RO 
C$PNTX 
04, SP 




MOV 

MOV 

MOV 

TRAP 

ADD 


OT3.3, (SP) 
01. -CSP) 
SP.RO 
C$PNTX 
04, SP 




MOV 
MOV 
MOV 
MOV 


LUSUII, -CSP) 
LUSWI2, -CSP) 
OT3.4, -CSP) 
03. -CSP) 



CNDMCAO 0MV11 LINE UNIT DIAG1 
TEST 2 -- SWITCH SETTING TEST 



M9 
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4635 
4636 
4637 



4638 



4639 



4640 
4641 

4642 



4643 
4644 



4645 
4646 
464 7 
4648 
4649 
4650 
4651 
4652 
4653 
4654 
4655 



022252 
022254 
022256 
022262 
022266 
022272 
022272 
022276 
022302 
022306 
022312 
022314 
022316 
022322 
022322 
022326 
022332 
022334 
022336 
022342 
022342 
022342 

022344 
022344 
022344 
022344 
022350 
022354 
022360 
022364 
022366 
022370 
022374 
022400 
022400 
022400 



022402 
022426 
022513 
022542 
022573 
022636 
022700 



010600 
104415 
062706 
105037 
105037 

013746 
013746 
012746 
012746 
010600 
104415 
062706 

012746 
012746 
01C600 
104414 
062706 



104423 



013746 
012746 
012746 
012746 
010600 
104414 
062706 
004737 



104423 



123 
045 
045 
045 
045 
045 
123 



OOOOIO 
022001 
022011 

022010 
022000 
022636 
000003 



000010 

011645 
000001 



000004 



002472 
015541 
012523 
000003 



000010 
020356 







SEQ 0116 




MOV 


SP.RO 




TRAP 


C*PNTX 




ADO 


010, SP 


CLRB 


T3.SW1»1 jMAKE SURE BITS 8 THROUGH 15 AREN'T REPORTED 


CLRB 


T3.5W2*1 ; -- ESPECIALLY BIT 8!! 




PRINTX 


#T3,5,T3.SW1,T3.SW2 






MOV 


T3.SW2.~CSP) 




MOV 


T3.SW1, -CSP) 




MOV 


M3.5.-CSP) 




MOV 


$3, -CSP) 




MOV 


SP.RO 




TRAP 


CtPNTX 




ADD 


010, SP 


PRINTB 


tfNEWLIN 






MOV 


ONEWLIN.-CSP) 




MOV 


•1,-CSP) 




MOV 


SP.RO 




TRAP 


C$PNTB 




ADD 


04.SP 


ENDMSG 


L10023j 






TRAP 


C$MSG 


BGNMSG 


T3.EM2 

T3.EM2:: 




PRINTB 


0FMT21,flTXT12,MPCSR 






MOV 


MPCSR.-CSP) 




MOV 


0TXT12, -CSP) 




MOV 


*FMT21, -CSP) 




MOV 


*3,-(SP) 




MOV 


SP.RO 




TRAP 


CiPNTB 




ADD 


010, SP 



127 
116 
116 
116 
116 
116 
120 



.NLIST 
111 T3.EHD: 
045 T3.1 
045 T3.2 
045 T3.3 
045 T3.4 
045 T3.5 
104 T3.6 
.LIST 
.EVEN 



JSR 
ENDMSG 



BEX 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 

BEX 



PC.ERRll* 



{GET AND PRINT VIA REGISTERS 

L 10024: 



TRAP 



CJMSG 



'SUITCH SETTING TEST' 

/#N*ASUITCH PACK SETTING DOES NOT MATCH P-TABLE ENTRY/ 
»#N*S22«A DDCMP BOOT' 
' *M#S22*AADDRESS ADDRESS ' 
• *N#S6*AP - TABLE VALUES : *S H03#S6*03 ' 
'*N*S6*AREAD FROM DMV :*S2*03*S6#03' 
/SPDSEL SWITCH DOESN'T MATCH P-TABLE BAUD RATE ENTRY/ 



N9 
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4673 .S8TTL TEST 3 - - USYRT MASTER CLEAR TEST 



SEQ 0117 



* ♦ 

* 
* 

* 

+ 

* 
* 
* 
* 

+ 
+ 



TEST 3 -- USYRT MASTER CLEAR TEST 

ALL REGISTERS ARE LOADED WITH PATTERN E IN THE SAME SEQUENCE AS FOR 

PATTERN F BELOW. THE USYRT IS THEN CLEARED BY A MASTER CLEAR 

(BIT 6 OF BSEL 1). ALL REGISTERS ARE THEN CHECKED FOR 

THE PROPER CONTENTS. THE INITIALIZED STATE OF THE REGISTERS IS CHECKED 

AGAINST DATA PATTERN F. 

PATTERN E: 377, 3/7, 377, 377, 377, 377, 377, 366. 
PATTERN Ft 000, 000, 000, 000, 000, 000, 000, 110. 

SEQUENCE OF REGISTERS AS USED WITH PATTERNS E 6 F : 

RDSRL, RDSRH, TDSRL , TDSRH, PCSARL , PCSARH, PCR . USYRT STATUS REG 



-+** + ** +* + ♦ + + + + + + + + + + + + + + + + + + + + + + + * + + + + + + + + + + + + + + + + + + + + + ♦ + + + * + + * + + + + + 4. + ** + ** 



BGNTST 





022764 






4674 


022764 


004737 


005420 


4675 


022770 


005001 




4676 


022772 


012702 


002652 


4677 


022776 


016137 


002552 023014 


4678 


023004 


11.2237 


023016 


4679 


023010 


004537 


0C3734 


4680 


023014 


000000 




4681 


023016 


000000 




4682 


023 20 


062701 


000002 


4683 


023024 


020127 


000020 


4684 


023030 


002762 




4685 


023032 


004737 


005420 


4686 


023036 


005001 




4687 


023040 


012702 


002662 


4688 


023044 


016137 


002552 023056 


4689 


023052 


004537 


003610 


4690 


023056 


oooooo 




4691 


023060 


000000 




4692 


023062 


123722 


023060 


4693 


023066 


001422 




4694 


023070 


010137 


002412 


4695 


023074 


006237 


002412 


4696 


023100 


005037 


002400 


4697 


023104 


116237 


177777 002400 


4698 


023112 


013737 


023060 002402 


4699 








4700 


023120 








023120 


104455 






023122 


000053 






023124 


013103 






023126 


017372 




4701 


023130 







1$ 



2$ 
3$ 



6$ 

7$ 
8$ 



;REPORT 



JSR 


PC.INIDMV ; 


CLR 


Rl l 


MOV 


*PATE,R2 } 


MOV 


USYREG(R1),2$ ; 


MOVB 


CR2)*,3$ j 


JSR 


R5.WRITEI i 


.WORD 


t 


.WORD 


; 


ADD 


02, Rl i 


CMP 


R1.016. j 


BLT 


1* J 


JSR 


PC.INIDMV i 


CLR 


Rl i 


MOV 


*PATF,R2 j 


MOV 


USYREGCR1),7* j 


JSR 


R5,READI i 


.WORD 


j 


.WORD 


i 


CMPB 


8*,CR2)* ; 


BEQ 


91 j 


MOV 


Rl.REGNUM { 


ASR 


REGNl "M j 


CLR 


GDATM j 


MOVB 


-KR2),GDATA 


MOV 


8I.BDATA j 


REG NOT 


CLEARED BY MASTER 


GEDF 


EM1,ERR10 



T3:: 
INIT DMV-11 

INIT USYRT REG ADRS POINTER 
INxT PATTERN E POINTER 
GET USYRT REG ADRS 
GET A PATTERN BYTE 
WRITE A USYRT REG 
USYRT REG ADRS GOES HERE 
DATA BYTE GOES HERE 
INCR REG ADRS PTR 
SEE IF ALL REGS WRITTEN YET 
BR IF NOT 
ISSUE MASTER CLEAR 
INIT USYRT REG ADRS PTR 
INIT DATA PATTERN POINTER 
SET USYRT READ ADDRESS 
READ A USYRT REG 
USYRT REG ADRS GOES HERE 
DATA READ IS RETURNED HERE 
SEE IF REG CONTAINS EXPECTED DATA 
BR IF MATCH 

SET USYRT REG NO. FOR PRINTOUT 
GET WORD OFFSET 
GET EXPECTED DATA 

GET ACTUAL DATA 
CLEAR 



"DEVICE FATAL" ERROR 



ESCAPE TST 



43 




TRAP 


C*ERDF 


.WORD 


43 


.WORD 


EMI 


.WO! 


ERR10 



uo 
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'jKQ 0113 



4 70? 
4 705 
4/04 
470b 



023130 
023132 
023134 
023140 
023144 
023146 
023146 
023146 



104410 
0OO014 
062701 
020127 
002737 



104401 



000002 
000020 



S$ 



fcNOTST 



ADC 


♦2.R1 


CMP 


Rl»«16. 


BLT 


6* 



{INCH U'.iYHT 
|SF.E If ALL 
I BR IF NUT 



RFC. ADR'i PTR 
REGS READ VET 



TRAP 
.WORD 



CU'.CAPt 
L100<f*»-. 



L 10020; 



TRAP 



CMLTtiT 



C I 
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TEST 4 - USYRT PROGRAM RESFT TEST 

4722 .sbtti. test 4 - USYRT PROGRAM RF.SE T TEST 

TEST 4 -- USYRT PROGRAM RESET TEST 

ALL REGISTERS ARE LOADED WITH PATTERN !■' IN THE SAME SEQUENCE AS FOR 
PATTERN F BELOW. THE USYRT IS THEN RESl \ BY ASSERTING PROGRAM RESET 
(BIT S AOOO) IN THE 6*522 VIA. ALL REGISTERS ARE THEN CHECKED rOH 
THE PROPER CONTENTS. THE INITIALIZED STATE OF THE REGISTERS IS CHECKED 
AGAINST DATA PATTERN F. 

PATTERN E: 577, 377, 377, 377, 377, 377, 3/7, 366. 
PATTERN F: 000, 000, 000, 000. 000, 000, 000, 110. 

SEQUENCE OF REGISTERS AS USED WITH PATTERNS F. £ F < 

RDSRL, RDSRH, TDSRL , TDSRH, PCSARL , PCSARH, PCR, USYRT STATUS REG 

BGNTST 

T4; ; 
iINIT DMV-11 

lINIT USYRT REG AORS POINTER 
iINIT PATTERN E POINTER 
j GET USYRT REG AORS 
,GET A PATTERN BYTE 
, WRITE A USYRT REG 
> USYRT REG AORS GOES HERE 
»DATA BYTE GOES HERE 
iINCR REG ADRS PTR 
j SEE IF ALL REGS WRITTEN YET 
iBR IF NOT 

jRESET USYRT/VERIFY SAME 
j BR IF NO ERROR 
iREPORT STACKED ERROR 



SFQ 0119 



4723 
4 724 
4 7. >5 
4/26 
472/ 
4728 
4 729 
4730 
4731 
4732 
4733 
4734 
4 735 
4736 
4737 

4738 



4 739 
4740 
4741 



023150 
023150 
023154 
023156 
023162 
023170 
023174 
023200 
023202 
023204 
023210 
023214 

023216 
023222 

025224 
02322* 
023226 
023226 
023230 



023232 
023232 
023232 



004737 005420 

005001 

012702 002652 

016137 002552 023200 

112237 023202 

004537 003734 

000000 

OOOOOO 

062701 000002 

020127 000020 

002762 

0O4537 005126 
103003 

104460 

104410 
000002 



104401 



!♦ 



2$ 
3* 



JSR 


PC.INIDMV 


CLR 


Rl 


MOV 


♦PATE.R2 


MOV 


USYREGCRD.2* 


MOVB 


(R2)*.3« 


JSR 


R5.WRITEI 


.WORD 





.WORD 





ADO 


♦2.R1 


CMP 


Rl,*16. 


BLT 


1* 


JSR 


R5.RSTCHK 


BCC 


. *8. 


ERROR 




ESCAPE 


TST 



j SKIP TO ENO Qf TEST 



ENQTST 



L 10026; 



TRAP 

TRAP 
.WORD 



TRAP 



CIERROR 

CIESCAPE 
I 10026 -. 



CfETST 



)10 
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475b .SBTTL TEST 5 -- USYRT REGISTER ADDRESSING TEST 



SEQ 0120 



* TEST 5 -- USYRT REGISTER ADDRESSING TEST 

* 

* FIRST, A MASTER CLEAR IS ISSUED, TO INITIALIZE THE USYRT REGS TO 

* PATTERN F. THEN, EACH REGISTER IS WRITTEN WITH A BYTE OF PATTERN J, 

* AND AFTER EACH IS WRITTEN, ALL ARE READ AND COMPARED TO THE CURRENT 

* EXPECTED VALUES. THIS IS PERFORMED FOR ALL REGISTERS -- INCLUOING THE 

* READ ONLY REGS -- IN ORDER TO MAKE SURE THAT EACH REGISTER ONLY RESPONDS 

* TO ITS OWN ADDRESS. 

* PATTERN F : 000, 000, 000, 000, 000, 000, 000, 110 

* PATTERN J: 000, 000. 001, 002, 004, 020, 040, 010 
♦ 

* SEQUENCE OF REGISTERS AS USED WITH PATTERNS F C J: 

* RDSRL, RDSRH, TDSRL, TDSRH, PCSARL, PCSARH, PCR, USYRT STATUS REG 

- -++*+******++*+*****+*+***♦**+++****+****#+*♦**************+***♦♦**• ******** 



BGNTST 





023234 














4757 


023234 


004737 


005420 






JSR 


PCINIDMV } 


4 758 


023240 


012702 


002662 






MOV 


♦PATF.R2 j 


4759 


023244 


012703 


002572 






MOV 


*REDDAT,R3 i 


4 760 


023250 


112223 






1$: 


MOVB 


(R2)>, (R3)* i 


4/61 


023252 


020227 


002672 






CMP 


R2,*PATG 


4/62 


023256 


103774 








BLO 


1$ 


4763 


023260 


005001 








CLR 


Rl i 


4 764 


023262 


005002 








CLR 


R2 \ 


4/65 


023264 


016137 


002552 


023330 


2*! 


MOV 


USYREG(R1),3$ » 


4/66 


023272 


116237 


003013 


023332 




MOVB 


PATJ(R2),4$ i 


4767 


023300 


113762 


023332 


002572 




MOVB 


4$,REDDAT(R2) i 


4768 


023306 


023727 


023330 


120402 




CMP 


3$ t *TDSRL ; 


4769 


023314 


001003 








BNE 


10$ ( 


4770 


023316 


142737 


OOOIOO 


002601 




BICB 


*100,REDDAT»7 j 


4771 


023324 


004537 


003734 




10$: 


JSR 


R5.WRITEI i 


4772 


023330 


000000 






31: 


.WGKD 


i 


4773 


023332 


000000 






4$; 


.WORD 


t 


4774 


023334 


005003 








CLR 


R3 , 


4775 


023336 


005004 








CLR 


R4 i 


4776 


023340 


016337 


002552 


023352 


5$: 


MOV 


USYREG(R3),6* j 


477/ 


023346 


004537 


003610 






JSR 


R5,READI i 


4778 


023352 


000000 






6*: 


.WORD 


i 


4779 


023354 


000000 






7$: 


.WORD 


i 


4 780 


023356 


123764 


023354 


002572 




CMPB 


7I.REDDAUR4) i 


4 781 


023364 


001420 








BEQ 


8* i 


4782 


023366 


010437 


002412 






MOV 


R4.REGNUM i 


4/83 


023372 


005037 


002400 






CLR 


GOATA j 


4784 


023376 


116437 


002572 


002400 




MOVB 


RED0AT(R4),G0ATA 


4785 


023404 


013737 


023354 


002402 




MOV 


7I.BDATA i 


4/86 










j REPORT 


REGISTER MISCOMPARR ERROR 


4/8/ 


023412 

023412 
023414 
025416 


104455 
000054 
013741 








GEO? 


EM66,£RR10 



T5:: 
ISSUE MASTER CLEAR TO INIT DMV 
INIT PATTERN I POINTER 
INIT PTR TO EXPECTED DATA AREA 
MOV PATTERN F INTO REDDAT TABLE 



INIT USYRT REG ADHS PTR FOR WRITING 

INIT INDEX FOR WRITING 

SET USYRT REG AORS 

SET DATA FOR WRITE 

SET EXPECTED DATA BYTE 

SEE IF WRITING TDSRL 

BR IF NOT 

FIX EXPECTED USTAT VALUE 

WRITE BYTE INTO A USYRT REG 

REG ADRS GOES HERE 

DATA BYTE GOES HERE 

INIT USYRT REG ADRS PTR FOR READING 

INIT INDEX FOR READING 

SET USYRT REG ADRS 

READ A USYRT REG 

REG ADRS GOES HERE 

DATA BYTE REAO IS RETURNED HERE 

SEE IF BYTE READ MATCHES EXPECTED BYTE 

BR IF MATCH 

SET FAILING REG NO. FOR ERROR REPORT 

GET EXPECTED DATA 



GET ACTUAL DATA 



"DEVICE FATAL " ERROR * 



44 




TRAP 


CJERDF 


.WORD 


44 


.WORD 


EM66 



CNOMCAO DMVll LINE UNIT OIAG1 

TEST 5 -- USYRT REGISTER ADDRESSING TEST 

023420 017372 

4788 023422 
023422 104410 
023424 000032 

4789 023426 062703 000002 8$: 
4 790 023432 005204 

4 791 023434 020427 000010 

4 792 023440 002737 

4 793 023442 062701 000002 

4794 023446 005202 

4 795 023450 020227 000010 

4796 023454 002703 

4797 023456 ENDTST 
023456 

023456 104401 



ElO 
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SEQ 0121 



.WORD ERR10 



ESCAPE 


TST 


ADD 


02.R3 


INC 


R4 


CMP 


R4.01O 


BLT 


5* 


AOO 


02, Rl 


INC 


R2 


CMP 


R2.01O 


BLT 


2% 



TRAP 
.WORD 

tINCR USYRT REG ADRS PTR FOR READING 

iINCR READ INDEX 

;SEE IF ALL REGS READ YET 

;BR IF NOT ALL READ YET 

jINCR USYRT REG ADRS PTR FOR WRITING 

;INCR WRITE INDEX 

;SEE IF ALL REGS WRITTEN YET 

{BR IF NOT ALL WRITTEN YET 



CtESCAPF. 
L10027-. 



L10027; 



TRAP 



CSETST 



CNDMCAO DMVU LINE UNIT DIAG1 
TEST 6 -- R/W BIT TEST OF PCSAR 
4806 



no 
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HIGH BYTE 

.SBTTL 



4807 
4808 
4809 

4810 



4811 
4812 
4813 
4814 
4815 
4816 



4817 
4818 
4819 
4820 
4821 
4822 
4823 

4824 



4825 
4826 



4827 
4828 
4829 
4830 



023460 
025460 
023464 
023466 
023466 
023470 
023470 
023472 

023474 
023500 
023504 

023512 
023512 
023512 

023514 
023520 
023524 
023530 
023534 
023536 
023536 
023540 
023540 
023542 

023544 
023544 
023544 

023546 

023550 
023550 
023550 



004737 
103003 

104460 

104410 
000056 

012701 
012703 
012737 



104402 

111137 
112137 
012700 
004737 
103003 

104460 

104410 
000006 



104403 
077317 

104401 



005420 



002672 
000025 
000005 



002412 



002376 
002400 
120405 

004272 



TEST 6 



R/W BIT TEST OF PCSAR HIGH BYTE 



TEST 6 -- R/W BIT TEST OF PCSAR HIGH BYTE 



+ 

* 
* 

s* 

* 



WRITE, READ, AND COMPARE EACH WORD OF DATA PATTERN G. 

PATTERN G: 000, 001, 003. 004, 005. 007, 100, 101, 103, 104, 105, 
107, 000, 01/, 02/, 041, 200, 277, 103, 144, 115, 157, 000. 



BGNTST 



30$ 



T7.LP: BGNSUB 







T6: : 






JSR 


PC.INIDMV 


;INIT DMV/VIA 6 START UP MAINT, 


LOOP 




BCC 


30$ 


» IF AN ERROR OCCURED, 






ERROR 




;REPORT IT e 


TRAP 


C$ERRCR 


ESCAPE 


TST 


1 EXIT 


7RAP 
.WORD 


CIESCAPE 
L1C030-. 


MOV 


♦PATG.Rl 


;POINT TO PATTERN TABLE 






MOV 


*<PATH-PATG-2 


>,R3 jGET * OF ENTRIES IN TABLE 






MOV 


#5,REGNUM 


jERROR INDEX FOR PCSARH 







MOVB 


(Rl).TDATA 


MOVB 


(Rl)f .GOATA 


MOV 


♦PCSARH, RO 


JSR 


PC.STUREG 


BCC 


10$ 


ERROR 





10$ 



ESCAPE TST 



ENDSUB 



SOB 



F.NDTST 



R3.T7.LP 



{THE Sl^TEST ONLY TESTS THE ONE PATTERN 

T6.1: 

TRAP C$BSU6 

tSETUP TEST DATA BYTE FOR "STUREG" 

jSETUP EXPECTED DATA BYTE FOR "STUREG" 

iSPECIFY THE REGISTER BEING TESTED 

jPERFORM STATIC TEST OF THE SPECIFIED REGISTER 

t WAS AN ERROR FOUND? 

;YES, REPORT IT ANO 

TRAP C$ERROR 

i EXIT FROM THE TEST. "CKLOOP" IS IMPLIED 

TRAP C$ESCAPE 
.WORD L 10030 -. 



SEQ 0122 



L10031: 



TRAP 



c$Esue 



j IF THERE IS IN FACT MORE DATA, LOOP BACK TO 
;TEST IT, ELSE, FALL OUT Of LOOP ANO TEST 



L 10030: 



TRAP 



CSETST 
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4839 
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4840 
4841 
4842 

4843 



4844 
4845 
4846 
4847 
4848 
4849 



4850 
4851 
4852 
4853 
4854 
4855 
4856 

4857 



4858 
4859 



4860 
4861 
4862 
4863 



023552 
023552 
023556 
023560 
023560 
023562 
023562 
023564 

023566 
023572 
023576 

023604 
023604 
023604 

023606 
023612 
023616 
023622 
023626 
023630 
023630 
023632 
023632 
023634 

023636 
023636 
023636 

023640 

023642 
023642 
023642 



004737 
103003 

104460 

104410 
000056 

012701 
012703 
012737 



104402 

111137 
112137 
012700 
004737 
103003 

104460 

104410 
000006 



104403 
077317 

104401 



.SBTTL TEST 7 -- R/W BIT TEST OF S/AR REGISTER 

+4*********************************************** **************************** 

* 

* TEST 7 -- R/W BIT TEST OF S/AR RFGISTER 

* 

* WRITE, READ, AND COMPARE EACH WORD OF DATA PATTERN H, 

* 

* PATTERN H: 125, 252, 000, 377, 000, 001. 002, 004, 010, 020, 040, 100, 

* 200, 000, 377, 376, 375, 373, 367, 357, 337, 277, 177. 377, 

* 000 

* 
--***********************++************************************************** 

BGNTST 



005420 



002721 
000027 
000004 



002412 



30$ 



T8.LP: BGNSU6 







T7 : ; 






JSR 


PC.INIDMV 


tINIT OMV C START UP THE MAINT. 


LOOP 




BCC 


30* 


;IF AN ERROR OCCURED, 






ERROR 




{REPORT IT £ 


TRAP 


CSERROR 


ESCAPE 


TST 


i EXIT 


TRAP 
.WORD 


CiESCAPE 
L10032-. 


MOV 


0PATH.R1 


;POINT TO PATTERN TABLE 






MOV 


♦<PATI-PATH-2> 


,R3 {GET OF ENTRIES IN TABLE 






MOV 


04.REGNUM 


{ERROR INDEX FOR S/AR BYTE 







002376 
002400 
120404 
004272 



MOVB 


(Rl).TDATA 


MOVB 


CR1)*,G0ATA 


MOV 


*PCSARL,RO 


JSR 


PC.STUREG 


BCC 


10$ 


ERROR 





10$ 



ESCAPE TST 



ENDSUB 



SOB 



ENOTST 



R3,T8.LP 



j THE SUBTEST ONLY TESTS THE ONE PATTERN 

T7.1: 

TRAP C$BSU6 

{SETUP TEST DATA BYTE FOR "STUREG" 

iSETUP EXPECTEO DATA BYTE FOR "STUREG" 

jSPECIFY THE REGISTER BEING TESTED 

{PERFORM STATIC TEST OF THE SPECIFIED REGISTER 

{WAS AN ERROR FOUND? 

{YES, REPORT IT AND 

TRAP C$ERROR 

; EXIT FROM THE TEST. "CKLOOP" IS IMPLIED 

TRAP CiESCAPE 
.WORD L 10032 -. 



L 10033 j 



TRAP 



CiESUB 



j IF THERE IS IN FACT MORE DATA. LOOP BACK TO 
{TEST IT. ELSE, FALL OUT OF LOOP AND TEST 



SEQ 0123 



L 10032: 



TRAP 



C$ETST 



1-1 1 



CNDMCAO 
TEST 8 
4874 
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.SBTTL TEST 3 -- R/W BIT TEST OF PCR REGISTER 



SEQ 0124 



4875 
4876 
4877 

4878 



4879 
4880 
4881 
4882 
'.883 
4884 



4885 
4886 
4887 
4868 
4889 
4890 
4891 

4892 



4893 
4894 



4895 
4896 
4897 

4898 



023644 
023644 
023650 
023652 
023652 
023654 
023654 
023656 

023660 
023664 
023670 

023676 
023676 
023676 

023700 
023704 
023710 
023714 
023720 
023722 
023722 
023724 
023724 
023726 

023730 
023730 
023730 

023752 

023754 
023734 
023734 



004737 
103003 

104460 

104410 
000056 

012701 
012703 
012737 



104402 

111137 
112137 
012700 
004737 
103003 

104460 

104410 
000006 



104403 
077317 

104401 



* TEST 8 -- R/W BIT TEST OF PCR REGISTER 

* 

* PATTERN I IS LOADED INTO PCR (HIGH) AND THE DATA READ BACK ANO 

* CHECKED. 
♦ 

* PATTERN I: 000, 041, 102, 143, 204, 245, 306, 347, 000, 001, 002, 

* 004, 040, 100, 200, 000, 346, 345, 343, 307, 247, 147, 347, 242. 

* 105, 347, 010, 020, 367, 357, 030, 027, 377. 

BGNTST 



005420 



002752 
000037 
000006 



002412 



30$: 



19. LP: BGNSUB 







T8:: 




JSR 


PC.INIOMV 


;INIT OMV/VIA 6 START UP MAINT. LOOP 




BCC 


30$ 


i IF AN ERROR OCCURED. 




ERROR 




{REPORT IT & 








TRAP 


C TERROR 


ESCAPE 


TST 


j EXIT 








TRAP 


CiESCAPE 






.WORD 


L10034-. 


MOV 


♦PATI.R1 


j POINT TO PATTERN TABLE 




MOV 


*<PATJ-PATI-2 


>,R3 {GET OF ENTRIES IN TABLE 




MOV 


*6,REGNUM 


jERROR INOEX FOR PCR REGISTER 





002376 
002400 

120407 
004272 



MOVB 


(Rl).TOATA 


MOVB 


CR1)*,GDATA 


MOV 


JPCR.RO 


JSR 


PC.STUREG 


BCC 


10* 


ERROR 




ESCAPE 


TST 



10$: 



ENDSUB 



SOB 



ENDTST 



{THE SUBTEST ONLY TESTS THE ONE PATTERN 

T8.1: 

TRAP C*BSU8 

{SETUP TEST OATA BYTE FOR "STUREG" 

{SETUP EXPECTED DATA BYTE FOR "STUREG" 

{SPECIFY THE REGISTER BEING TESTED 

{PERFORM STATIC TEST OF THE SPECIFIED REGISTER 

{WAS AN ERROR FOUND? 

{YES, REPORT IT ANO 

TRAP C fERROR 

$ EXIT FROM THE TEST. "CKLOOP" IS IMPLIED 

TRAP CIESCAPE 
.WORD L10034-. 



L10035: 



TRAP 



CiESue 



R3.T9.LP 



{IF THERE IS IN FACT MORE DATA. LOOP BACK TO 
{TEST IT. ELSE. FALL OUT OF LOOP AND TEST 



L 10034: 



TRAP 



C$ETST 







CNDMCAO DMVU LINE UNIT DIAGL 
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4915 



4916 
4917 
4918 

4919 



4920 
4921 
4922 
4923 
4924 
4925 



4926 
4927 
4928 
4929 
4930 
4931 
4932 
4933 
4934 
4935 
4936 
4937 
4938 
4939 
4940 
4941 
4942 
4943 



023736 
023736 
023 7 42 
023744 
023744 
023746 
023746 
023750 

023752 
023756 
023762 

023766 
023766 
023766 

023770 

023774 

024000 
024004 
024006 

024010 
024014 
024016 

024020 
024026 
024034 

024036 
024044 



004737 
103003 

104460 

104410 
000114 

012701 
012703 
012702 



104402 

112137 
112237 

004537 
12O403 
002376 

0O4537 
120403 
002402 

042737 
023737 
001411 
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REGISTER'S HIGH BYTE 

.SBTTL TEST 9 - R/U BIT TEST OK TDSR REGISTER'S HIGH BYTE 

* 

TEST 9 -- R/W BIT TEST OK TDSR REGISTER'S HIGH BYTE 



SEQ 01*5 



005420 



003023 
000017 
003044 



002376 
002400 

003722 



003476 



177760 
002400 



002402 
002402 



* 

+ 
* 

* 
* 



PATTERN K IS LOADED INTO TDSR (HIGH) AND THE DATA READ BACK IS 
COMPARED AGAINST PATTERN L. (UNPREDICTABLE BITS ARE MASKED OFF TO 
WHEN READING FOR COMPARISON.) 

PATTERN K: 000, 377, 376, 375, 373, 376, 177, 377, 000, 001, 002, 
004, 010, 200, 125, 252. 000. 

PATTERN L: 000, 017, 016, 015, 013, 016, 017, 017, 000, 001, 002, 
004. 010. 000. 005, 012. 000. 

NOTE THAT THE UNDEFINED BITS (12, 13, 6 14) ARE MASKED OFF TO 0* S 
FOR THE COMPARISON. ALSO THAT BIT 15 IS A READ/ONLY BIT AND CAN'T BE 
SET -- THEREFORE SHOULD ALUAYS BE READ AS A BY THIS TEST. 

-******************************************************++******************« 

BGNTST 



012737 000003 002412 



30$: 



T10.LP: BGNSUB 



MOVB 
MOVB 

JSR 

.WORD 

.WORD 

JSR 

.WORD 

.WORD 

BIC 

CMP 
BEQ 

MOV 
GEDF 







T9:: 




JSR 


PC.INIDMV 


:INIT DMV/VIA 6 START UP MAINT. LOOP 




BCC 


30$ 


j IF AN ERROR OCCURED. 




ERROR 




{REPORT IT 6 








TRAP 


CIERROR 


ESCAPE 


TST 


j EXIT 








TRAP 


CIESCAPE 






.WORD 


L 10036 -. 


MOV 


*PATK,R1 


{POINT TO PATTERN TABLE 




MOV 


»<PATL-PATK-2 


>,R3 ;GET * OF ENTRIES IN TABLE 




MOV 


0PATL.R2 


{POINT TO "EXPECTED** DATA PATTERN 


TABLE 



(R1)*,TDATA 
(R2)*,GDATA 

R5. WRITE 

TDSRH 

TDATA 

R5.REA0 

TDSRH 
BDATA 

0177760. BDATA 
GDATA, BDATA 
10* 

G3.REGNUM 
EM25.ERR7A 



{THE SUBTEST ONLY TESTS THE ONE PATTERN 

T9.1: 

TRAP CSBSUB 

{SETUP TEST DATA BYTE 
{SETUP EXPECTED DATA BYTE 

{WRITE TO DMV-11 

{ DMV-11 ADDRESS WRITTEN TO 

j LOCATION OF DATA WRITTEN 

{READ FROM DMV-11 

{ DMV-11 ADDRESS READ FROM 

{ LOCATION WHERE READ DATA IS PUT 

{MASK OUT "DON'T CARE" BITS 
{READ DATA - EXPECTED DATA ? 
;WAS AN ERROR FOUM)? 

{YES: SET UP REGISTER NUMBER 
{REPORT IT AND 
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TEST 9 
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J 1.0 

PAGE 74 1 



4944 



4945 
4946 



494 7 
4948 
4949 
4950 



024044 
024046 
024050 
024052 
024054 
024054 
024056 

024060 
024060 
024060 

024062 

024064 
024064 
024064 



104455 
000055 
013366 
017252 

104410 
000006 



104403 
077337 

104401 



10$: 



ESCAPE TST 



ENDSUB 



EXIT FROM THE TEST 





SEQ 0126 


RROR #45 




TRAP 


CIERDF 


.WORD 


45 


.WORD 


EM25 


.WORD 


ERR7A 


••CKLOOP" IS IMPi 


;-^Q 


TRAP 


Cvt SCAPE 


.WORD 


L10036-. 



L 10037: 



TRAP 



C9E5U6 



SOB 



R3,T10.LP 



ENDTST 



I IF THERE IS IN FACT MORE DATA. LOOP BACK TO 
{TEST IT. ELSE, FALL OUT OF LOOP AND TEST 



L 10036: 



TRAP 



CtETST 



/ ' 



1.0 



CN0MCAO DMV11 LINE UNIT 
TEST 10 - R/W BIT TEST 
4958 



DIAG1 
OF TXDB 



4959 
4960 
4961 

4962 



4963 
4964 
4965 
4966 
4967 
4968 



4969 
4970 
4971 
4972 
4973 
4974 
4975 

4976 



4977 
4978 



4979 
4980 
4981 
4982 



024066 
024066 
024072 
024074 
024074 
024076 
024076 
024100 

024102 
024106 
024112 

024120 
024120 
024120 

024122 
024126 
024132 
024136 
024142 
024144 
024144 
024146 
024146 
024150 

024152 
024152 
024152 

024154 

024156 

024156 
024156 
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REGISTER 

.SBTTL TEST 10 -- R/W BIT TEST OF TXDB REGISTER 

* « **.* + ** + + **+ *** + *********** + *****************a***** + ******. + *********** + + ** + * 
+ 

* TEST 10 -- R/W BIT TEST OF TXDB REGISTER 

+ 

* WRITE, READ, AND COMPARE EACH WORD OF DATA PATTERN H. 

* PATTERN H: 000, 001, 002, 004, 010, 020, 040. 100, 200, 000, 377, 

* 376, 375. 373, 367, 357, 337, 277, 177, 377, 000 

* 

BGNTST 



004 737 
103003 

104460 

104410 
000056 

012701 
012703 
012737 



104402 

111137 
112137 
012700 
004737 
103003 

104460 

104410 
000006 



104403 
077317 

104401 



005420 



002721 
000027 
000002 



002412 



30$ 



Til. LP: BGNSUB 







T10: : 






JSR 


PC.INIDMV 


jINIT DMV/VIA 6 START UP MAINT. 


LOOP 




BCC 


30$ 


;IF AN ERROR OCCURED, 






ERROR 




{REPORT IT 5 


TRAP 


C TERROR 


ESCAPE 


TST 


; EXIT 


TRAP 
.WORD 


C5ESCAPE 
L 10040 -. 


MOV 


0PATH.R1 


;POINT TO PATTERN TABLE 






MOV 


*<PATI-PATH-2> 


,R3 {GET * OF ENTRIES IN TABLE 






MOV 


02.REGNUM 


{ERROR INDEX FOR TXDB REGISTER 





002376 
002400 
120402 
004272 



MOVB 


(Rl).TDATA 


MOVB 


CR1)».GDATA 


MOV 


#TDSRL,RO 


JSR 


PC, STUREG 


BCC 


10$ 


ERROR 





10$ 



ESCAPE TST 



ENDSUB 



SOB 



ENDTST 



R3.T11.LP 



jTHE SUBTEST ONLY TESTS THE ONE PATTERN 

T10.1: 

TRAP C$BSUB 

jSETUP TEST DATA BYTE "OR "STUREG" 

{SETUP EXPECTED DATA BYTE FOR "STUREG* 1 

{SPECIFY THE REGISTER BEING TESTED 

{PERFORM STATIC TEST OF THE SPECIFIED REGISTER 

{WAS AN ERROR FOLfrtf)? 

{YES, REPORT IT AND 

TRAP C $ERROR 

j EXIT FROM THE TEST. "CKLOOP" IS IMPLIED 

TRAP C$ESCAPE 
.WORD L 10040 -. 



L 10041: 



TRAP 



C$ESL6 



{IF THERE IS IN FACT MORE DATA, LOOP BACK TO 
{TEST IT. ELSE, FALL OUT OF LOOP AND TEST 



SEQ 01*7 



L10040: 



TRAP 



C$ETST 
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4991 



4992 
4995 
4994 

4995 



4996 
4997 
4998 
4999 
5000 
5001 
5002 
5003 
5004 
5005 

5007 
5008 
5009 
5010 
5011 
5012 



024160 
024160 
024164 
024166 
024166 
024170 
024170 
024172 

024174 
024200 



024210 
024214 
024216 

024220 
024224 
024226 



024232 
024232 
024232 



004 737 
103003 

104460 

104410 
000040 

012701 
012703 



024204 012137 



004537 
120400 
000000 

004537 
120400 
OOOOOO 



024230 077313 



L 10 
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OF RXDB 

.SBTTL TEST 11 -- PSEUDO R/W BIT TEST OF RXDB 



SEQ 0128 



005420 



002721 
000027 

024216 

003734 

003610 



+ 

* 

+ 
+ 
+ 

* 

BGNTST 



TEST 11 -- PSEUDO R/W BIT TEST OF RXDB 

WRITE, READ (BUT NO COMPARE) OF EACH WORD IN DATA PATTERN H. THIS IS 
PRIMARILY TO PROVIDE A SCOPE LOOP FUNCTION ON THIS REGISTER. 

PATTERN H: 000, 001, 002, 004, 010, 020, 040. 100, 200, 000, 377, 
376, 375, 373, 367. 357, 337. 277, 177. 377, 000 



ENDTST 







Til: : 






JSR 


PC.INIDMV 


;INIT DMV/VIA 6 START UP MAINT . 


LOOP 




BCC 


30* 


j IF AN ERROR OCCURED, 






ERROR 




{REPORT IT 6 


TRAP 


CSERROR 


ESCAPE 


TST 


; EXIT 


TRAP 
.WORD 


CtESCAPE 
L10042-. 



30* : 


MOV 

MOV 


0PATH,R1 
*<PATI-PA 


20$: 


MOV 


CR1)*,2* 


2$: 


JSR 

.WORD 

.WORD 


R5.WRITEI 

RDSRL 






JSR 
.WORD 

.WORD 


R5,READI 

RDSRL 





SOB 



R3,30$ 



{POINT TO PATTERN TABLE 
;GET OF ENTRIES IN TABLE 



{WRITE TO DMV-11 

; DMV-11 ADORERS WRITTEN TO 

1 ACTUAL DATA WRITTEN 

jREAD FROM DMV-11 

i DMV-11 ADDRESS READ FROM 

; READ DATA IS PUT HERE 

j IF MORE DATA, LOOP BACK TO WRITE/READ IT, 
j ELSE. FALL OUT OF LOOP AND TEST 



104401 



L10042: 



TRAP 



C*ETST 



CNDMCAO DMVU LINE UNIT DIAG1 
TEST 12 -• PSEUDO R/W BIT TEST 
5021 



5022 
5023 
5024 

5025 



5026 
5027 
5028 
5029 
5030 
5031 
5032 
5033 
5034 
5035 
5036 
5037 
5038 
5039 
5040 
5041 
5042 



024234 
024234 
024240 
024242 
024242 
024244 
024244 
024246 

024250 
024254 



004737 
103003 

104460 

104410 
000040 

012701 
012703 



024260 012137 



024264 
024270 
024272 

024274 
024300 
024302 



024306 
024306 
024306 



004537 
120401 
OOOOOC 

004537 
120401 
000000 



024304 077313 



005420 



M10 
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OF RDSR'S HIGH BYTE 

.SBTTL TEST 12 -- PSEUDO R'W BIT TEST Of- ROSR' S HIGH BYTE 

* +*******************************************+**********+******** ************ 
* 

*■ TEST 12 -- PSEUDO R/W BIT TEST OF RDSR' 5 HIGH BYTE 

* 

* 
+ 

* 
* 

- -***********************+**********************+*********+*+**+**+++***+**++ 

BGNTST 

T12:: 

INIT DMV/VIA 6 STAR T UP MAINT. LOOP 
IF AN ERROR OCCURED , 
REPORT IT £ 



SEQ 0129 



002721 
000027 

024272 

003734 

003610 



URITE, READ (BUT NO COMPARE) OF EACH WORD IN DATA PATTERN H. THIS IS 
PRIMARILY TO PROVIDE A SCOPE LOOP FUNCTION ON THIS REGISTER. 

PATTERN H: 000, 001, 002, 004, 010, 020, 040, 100, 200, 000, 377, 
376, 375, 373, 367, 357, 337, 277, 177, 377, 000 





JSR 
BCC 
ERROR 


PCINIDMV 
30$ 




ESCAPE 


TST 


30$: 


MOV 
MOV 


*PATH,R1 
0<PATI-PA 


20*: 


MOV 


CR1)*,2* 


2*: 


JSR 

.WORD 

.WORD 


R5.WRITEI 

RDSRH 






JSR 

.WORD 

.WORD 


R5.READI 

RDSRH 





SOB 



ENDTST 



I EXIT 



jPOINT TO PATTERN TABLE 
0<PATI-PATH-2>,R3 {GET OF ENTRIES IN TABLE 



TRAP 

TRAP 
.WORD 



CJERROR 

CiESCAPE 
L 10043 -. 



R3,20$ 



j WRITE TO DMV-11 

; DMV-11 ADDRESS WRITTEN TO 

{ ACTUAL DATA WRITTEN 

READ FROM DMV-11 
DMV-11 ADDRESS READ FROM 
READ DATA IS PUT HERE 

;IF MORE DATA, LOOP BACK TO WRITE/READ IT, 
5 ELSE, FALL OUT OF LOOP AND TEST 



104401 



L10043; 



TRAP 



C$ETST 



CNDMCAO-0MV11 LINE UNIT DIAG1 
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5062 



5063 
5064 
5065 
5066 
5067 
5068 
5069 
5070 
5071 
5072 
5073 
5074 
5075 
5076 
5077 
5078 
5079 
5080 
5081 
5082 
5033 
5084 
5085 
5016 
50*/ 



024310 
024310 
024314 
024320 
024322 
024324 
024330 
024332 



024334 
024342 
024346 
024350 
024352 
024360 
024362 
024366 

024370 
024376 
0^4404 

0,?4412 

0?14''0 

J24420 
024422 
02442* 
024426 



004737 
004537 
120004 
00001/ 
0045 7 
1200J5 
000000 



012737 
004537 
120000 
OOOOOO 
132737 
001025 
0O5237 
001365 

012737 
012737 
013737 
0*2737 



10 ;55 

000056 
013252 
017546 



NIC 
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.SBTTL TEST 13 -- NULL CLOCK TEST 

.+ + *** + + * + + + *4. + * + ** + + + + * + + + + + A + * + + * + + * + * + + * + ^ 
5* 

j* TEST 13 -- NULL CLOCK TEST 

J* 

}♦ KIRST, A MASTER CLEAR IS DONE TO INIT THE DMV . THEN, THE Tl TIMER ON THE 

;* VIA CHIP IS PROGRAMMED FOR SQUARE WAVE CLOCK GENERATION ON PB7 (BIT 7 

;♦ OF VIA OUTPUT REG B), WITH A BAUD RATI - 56 KBAUO . THIS IS THE MODE OF 

{♦ VIA OPERATION WHICH IS USED TO GENERATE THE NULL CLOCK. THEN, THE PROGRAM 

j* SCANS ORB REPEATEDLY TO MONITOR THE NULL CLOCK BIT, IN THE FOLLOWING 

j* SEQUENCE : 

i* - THE PROGRAM REPEATEDLY CHECKS THE NULL CLOCK BIT FOR THE 1 STATE, AND 

{ * IF IT IS U"T FOUND WITHIN ^VErtAL HUNDRED MICRO-SEC (A GROSS TIMEOUT 

INTERVAL), AN ERROR IS REPORT tD. (AT 56 KBAUO, THE CLOCK SHOULD 

HAVE A PERIOD OF ABOUT 18 MICRO-SEC.) 

- THE PROGRAM NEXT REPEATEDLY CHECKS THE NULL CLOCK BIT FOR THE STATE, 
AND IF IT IS NOT FOUND WITHIN SEVERAL HUNDRED MICRO-SEC, AN ERROR IS 
REPORTED. 

- THE PROGRAM NEXT REPEATEDLY CHECKS THE NULL CLOCK BIT FOR THE 1 STATE 
AGAIN, AND IF IT IS NOT FOUND WITHIN SEVERAL HUNDRED MICRO-SEC, 
AN ERROR IS REPORTED. 



SEQ 0130 



005420 
003734 



003734 



170000 
003610 



000200 
002602 



OOOOOO 
000200 
024350 
000 w 



002602 



024350 



002412 
002400 
002402 
008402 



* 

* 

* 

BGNTST 



JSR 

JSR 

VIAT1A 

15. 

JSR 

VIAT1B 

000 



PC,INIDMV 
R5.WRITEI 



R5.WRITEI 



T13:: 

j INIT DMV11 

j LOAD T1C-L, T1L-L FOR 56K BAUD 



{LOAD T1C--H, T1L-H, START CLOCK 



;WAIT FOR NULCLK BIT TO BE SET TO 1 



1* 
2$ 



MOV 

JSR 

VIAORB 

.WORD 

BITB 

BNE 

INC 

BNE 



01 70000, REGO 
R5,READI 



*NULCLK,2$ 

REGO 
It 



MOV *0,~EGNUM 
MOV ONULCLK.GDATA 
MOV 2$,BDATA 
BIC *177,BDATA 
{REPORT NWL CLK ,T ^k AT 
GEDF ci-u'.ERRU 



j INIT PROGRAM TIMER 
jREAD VIA ORB 



j SEE IF CLOCK BIT SET 

j BR IF SET 

ilNCR TIMER 

•BR IF TIMER DID NOT TIME OUT 

j (TIME OUT - SEVERAL HUNDRED MICRO-SEC) 

jSET VIA REG NO. FOR PRINTOUT 

;GET EXPECTED DATA 

j GET ACTUAL DATA 

.CL£AR UNUSED BITS 



"DEVICE FATAL" ERROR * 



46 




TRmP 


CiERDF 


.WORD 


46 


. WORD 


EM5 


.WORD 


ERR 11 



(ill. 



CNOMCAO DMVU LINE UNI' DIAG1 MACRO M1200 



TEST 13 
50R8 



5089 
5090 
5091 
5092 
5093 
5094 
5095 
5096 
5097 
5098 
5099 
5 LOO 
5101 
5102 
5105 
5104 
5105 
5106 



5107 



5108 
5109 
5110 
5111 
5112 
5113 
5114 
5115 
5116 
5117 
5118 
5119 
5120 
5121 
5122 
5123 
5124 
5125 



5126 
5127 



NULL CLOCK Tt.ST 



024430 
0244 30 
024432 



024534 
024542 
024546 
024550 
024552 
024560 
024562 
024566 

024570 
024576 
0246O4 
024612 

024620 

024620 
024622 
024624 
024626 
024630 
024630 
0246 30 
024630 
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ESCAPE TST 



SEQ 0131 



104410 
000176 



TRAP 
.WORD 



CIESCAPE 
L 10044* . 











j WAIT 


FOR NULCLK BIT TO BE CLEARED TO 




0244 34 


012737 


1 70000 


002602 


3$: 


MOV 


#1 70000, RFGO 


j INI I PROGRAM TIMER 




024442 


004537 


003610 




4$; 


JSR 


R5.READI 


I RE AD VIA ORB 




024446 


12OOO0 








VIAORB 








024450 


OOOOOO 






5$: 


♦ WORD 









024452 


132737 


000200 


024450 




BITB 


♦NULCLK ,5$ 


iSEE IF CLOCK BIT CLEARED 




024460 


001425 








BEQ 


of 


iBR IF CLEARED 




024462 


005237 


002602 






INC 


RFGO 


lINCR TIMER 




024466 


001365 








BNf. 


4$ 


iBR U TIMER DID NOT TIME OUT 


















1 (TIME OUT - SEVFRAL HUNDRED MICRO-SEC) 


0244 70 


012737 


OOOOOO 


002412 




MOV 


*0,REGNUM 


iSET VIA REG NO. FOR PRINTOUT 




024476 


01273/ 


OOOOOO 


002400 




MOV 


•OOO.GOATA 


(GET EXPECTED DATA 




024 504 


013737 


024450 


002402 




MOV 


5I.B0ATA 


iGET ACTUAL DATA 




024512 


042737 


000177 


002402 




BIC 


0177.BDATA 


l CLEAR UNUSED BITS 












jREPORT NULL CLK STUCK AT 1 






024520 










GEDf 


EM6.ERR11 


i "DEVICE FATAL" ERROR 9 4/ 




024520 


104455 












TRAP 


C*FRDf 


024522 


000057 












.WORD 


47 


024524 


013302 












.WORD 


EM6 


024526 


017546 












.WORD 


ERR11 


024530 










ESCAPE 


TST 






024530 


104410 












TRAP 


CIESCAPE 


024532 


000076 












.WORD 


I 10044 . 




lUAIT 


FOR NULCLK BIT TO BE SET 


TO 1 AGAIN 





012737 
0O4537 
120000 

OOOOOO 
132737 

0O1023 
0O5237 
0O1365 

012737 
012737 
013737 
042737 



104455 
000060 
013252 
017546 



104401 



170O00 
003610 



000200 
002602 



OOOOOO 
000200 

024550 
000177 



002602 



024550 



002412 
002400 
002402 
0024Q2 



6$; 


MOV 


♦1 70000, REGO 


71: 


JSR 
VIAORB 


R5.READI 


81; 


.WORD 







BITB 


•nu.ch:, 81 




BNE 


*>• 




INC 


REGO 




BNE 


7$ 



MOV #0,REGNUM 
MOV •NUCLK.GOATA 
MOV BI.BDATA 
BIC 0177,BDATA 

jREPORT Null CLK stuck at q 
GEDF EM5,ERR11 



I INI T PROGRAM TIMEH 
jREAD VIA ORB 



»SEE IF CLOCK BIT SET 

iBR IF SET 

iINCR TIMER 

jBR IF TIMER DID NOT TIME OUT 

l (TIME OUT • SEVERAL HUNDRED MICRO-SEC) 

j SET VIA REG NO. FOR PRINTOUT 

iGET EXPECTED DATA 

iGET actual D„TA 

jCLEAR UNUSED BITS 



"OtVXCfc FATAL" 



9«: 

ENOTST 



,RROR # 48 




TRAP 


CIERD* 


.WORD 


48 


.WORD 


EMS 


.WORD 


ERR11 


t 10044: 





TRAP 



UETST 



i. 
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TEST 14 BCP TX RESET W- IDLE - 

5149 .SBTTL TE.SI 14 nCP TX RESET W/TDl f 







SEQ 015? 



1 



5150 
5151 
5152 
5153 
5154 
5155 
515b 
5157 

5156 



5159 
5160 
r >161 
5162 
51t>3 
5164 
5165 
5166 
5167 
5168 
5169 
5170 
5171 
5172 

5173 
5174 



024632 

024632 0O4737 



024636 

024642 
0246*4 
024646 
024650 
024650 
024652 
024652 
024654 

024656 
024662 
024664 

024666 
024672 
024674 

024676 
024702 
024704 

024706 
024712 
024714 



004537 
043525 
OOOOOO 
103003 

104460 

104410 
000106 

004537 
OOOOOl 
0OOO07 

0O4537 

OOOOOl 
0OOO10 

004537 
OOOOOl 
000010 

00*537 
OOOOOO 
103003 



005420 
00740C 



' (BCP) WITH IDLE 
S/AR. A 226 SfNC 



TEST 14 BCP TX RE^ET W/IDLE - 

THE USYRT IS INITIALIZED FOR "BY Tfc -CONTROt. PROTOCOL 

SET TO ZERO ANO A 125 SYNC CHARACTER IS LOADED INTO 

CHARACTER IS LOADED INTO TXDB SO THAT THE SOURCE OF SYNC CHARACTER 

CAN BE LATER DETERMINED. THE VALID STATE OF 

READ AND CHECKED. TXE IS ASSERTED TO ENABLE 

THEN, TSOM IS ASSERTED AND TXC IS MANUALLY 
TXA ■- IT SHOULD BE ASSERTED WITHIN TWO (2) 

(TXBE SHOULD GO HIGHi AT THIS TIME THE 
BE LOADED INTO TXSO ANO TSOM IS AGAIN SET 



THE USYRT REGISTERS IS 
THE TRANSMITTER LOGIC. 
STEPPED WHILE OBSERVING 
CLOCK CYCLES. 

SYNC CHARACTER SHOULD 
DRIVING TXBE LOW. ) 
THREE SYNC CHARACTtRS ARE SENT/RECEIVED; THE FIRST TWO SYNCHRONIZE 
THE RECEIVER, THE THIRD IS DIRECTLY READ (STRIP SYNC IS OFF) ANO 
COMPARED AGAINST 125 (THE S/AR SYNC CHARACTER). 
IF VALUE READ IS 226, THEN TXDB PROVIDED THE SYNC (IE: ERROR). 
THE USYRT IS THEN RESET ANO REGISTERS ARE AGAIN READ ANO CHECKED. 
THIS TEST WILL GO NO FATHER INTO THE TRANSMIT SEQUENCE SO THAT ONL r 
ONE MARK ANO THREE SYNC CHARACTERS (FROM THE S/AR) IS TRANSMITTED. 

ERROR LOOPING WILL DEPENO ON WHERE THE FIRST ERROR OCCURS UITHIN THE 
SEQUENCE, 



-♦**' 



BGNTST 



010010 



010010 



010010 



011564 



T14: : 



JSR 


PCINIDMV 


jINIT DMV-11, ENTER M-LOOP 




JSR 


R5,INITRN 


jLOAD 1 SOM, CLK TX UNTIL ACTIVE 




DDCMH! 


MOCHK ! 125 


jSET DDCMP.NO CHECK, S/ARC SYNC ) -125 









lUSE 8 BIT CHARS 




BCC 


.♦8. 


j BR IF NO ERROR 




ERROR 




jREPORT STACKFD ERROR 








TRAP 


CSERROR 


ESCAPE 


TST 


■SKIP TO ENO OF TEST 








TRAP 


CiESCAPE 






.WORD 


L1Q045-. 


JSR 


R5.TXCTRL 


i OUTPUT 1ST SYNC CHARACTER 




TSOM 
7. 




}ANO KNOCK DOWN TBMT 




JSR 


R5,TXCTRL 


jOUfPUT 2ND SYNC CHARACTER 




TSOM 
8. 




j ANO KNOCK DOWN TBMT 




JSR 


R5,TXCTR'.. 


, OUTPUT 3RD STNC CHARACTER C121JS 




TSOM 
8, 




j ANO KNOCK DOWN TBMT 




JSR 


occ 


H5.RCV1ST 


j CI OCK AND RCV TSOM 




.♦a. 


jQR IF NO ERROR 





CNDMCAO 


OHVU LINK UN 11 


DIAG1 


TEST 14 


BCP 


TX RESET 


W 'IDLE 


5175 


024716 








024 716 


104460 




5176 


024720 








024 720 


104410 






024722 


000040 




5177 








5178 


024 724 


004537 


010110 


5179 


024 730 


000125 




5180 


024732 


000000 




5181 


024734 


OOOOIO 




5182 


024736 


103003 




5183 


024740 








024740 


104460 




5164 


024 742 








024 742 


104410 






024744 


000016 




5185 








5186 


024746 


004537 


005126 


5187 


024 752 


103003 




5188 


024754 








024 754 


104460 




5189 


024756 








024756 


104410 






024760 


0OOO02 




5190 








5191 


024 762 
024762 








024762 


104401 





MACRO M1200 .V »FFl-84 15:31 PA(tf ?U \ 



SEQ 0133 



ERROR 




ESCAPE 


TSJ 


JSR 

125 



8. 

BCC 

ERROR 


R5,RXCHAR 

. »8. 


ESCAPE 


TST 


JSR 
BCC 
ERROR 


R5.RSTCHK 
. >8. 


ESCAPE 


TST 



ENQTST 



, REPORT 5TACKFD E RRUH 
I SKIP 10 END OF TEST 



TRAP 



TRUP 
.WORD 



jRFAO AND CHECK f OR S/AR 125 SYNC 
j ANO CLOCK IN NEXT ONE. 



i BR IE NO ERROR 

, REPORT STACKED ERROR 

I SKIP TO END Of TEST 



tRESET USVRT/VERIFY SAME 

;BR IF NO ERROR 

j REPORT STACKED ERROR 



L 10045: 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 



CI ERROR 

C*E i :CAPf 
L 10045- . 



Cf ERROR 

CSESCAPF. 
L 10045 -. 



CIERROR 

CJESCAPE 
L 10045 -. 



CIETST 






CNOMCAO DMVll LINF. UNIT DIAG1 
TEST 15 - BCP TX RESET w/IDLE 
5215 



5216 
5217 
5218 
5219 
5220 
52? 1 
D222 
5223 

5224 



5225 
5226 
5227 
5228 
5229 
5230 

5231 



5232 
5233 
5234 
5235 



024770 
024774 
C?*776 
0250CO 

025002 
025002 
025004 
025004 
025006 

025010 
025014 
025016 
025020 
025022 
025022 
025024 
025024 
025026 

025030 
025034 
025036 



[.' 1 1 

MACRO M1200 22-rR8-64 15:31 PAGE 80 

.SBTTL TEST 15 -- BCP TX RESET W/IDLE - 1 



024764 

024764 004737 005420 



004537 007400 
047626 
000000 
103003 

xO4460 

L04.U0 

0001 J6 

004537 007676 
000226 
000007 
103003 

104460 

104410 
000116 

004537 007676 

000125 

000010 



SEQ 0154 



{ ♦♦ 

?* 

I* 

; * 

J* 
!* 
i* 

J* 
J* 

;* 

5* 

;* 
i* 
;* 
j + 

;* 
;* 
t* 
;* 
;* 
;* 
j* 
i* 
:* 
J* 



*iA4i4********«i*«*4i**A*******************4ii*»*«i*ikAUA*M»****M4iH4>i4****** 



TEST 15 



BCP TX RESET W/IDLE - i 



THE USYRT IS INITIALIZED FOR "BYTE -CONTROL PROTOCOL" (BCP) WITH IDLE 
SET TO ONE ANO A 226 SYNC CHARACTERS LOADED INTO S/AR ANO TXDB. 
THE VALID STATE Of" THE USYRT REGISTERS IS READ AND CHECKED. TXE IS 
ASSERTED TO ENABLE THE TRANSMITTER LOGIC. 

THEN, TSOM IS ASSERTED ANO TXC IS MANUALLY STEPPED WHILE OBSERVING 
TXA -- IT SHOULD BE ASSERTED UITHIN TWO (2) CLOCK CYCLES. 

(TXBE SHOULD GO HIGHj AT THIS TIME THE TXDB SYNC CHARACTER SHOULD 
BE LOADED INTO TXSO ANO TSOM IS AGAIN SET -- DRIVING TXBE LOW.) 

AFTER THE RECEIVER IS SYNCHRONIZED (TWO SYNC CHARACTERS), TXDB IS 
LOADED WITH A 125 AND, WITH TSOM STILL • 1 (SYNC SOURCE - TXDB), THE 
USYRT IS AGAIN CLOCKED. 

AT THIS POINT, IF THE IDLE BIT WORKED, THE VALUE 125 WILL BE READ 
BY THE RECEIVER. OTHERWISE A 226 WILL BE REAO, INDICATING TXDB WASN'T 
PROVIDING THE SYNC CHARACTERS. 

WHEN TXBE GOES HIGH AGAIN, THE USYRT IS RESET. 

ALL REGISTERS ARE AGAIN READ AND CHECKED. 

THIS TEST WILL GO NO FURTHER INTO THE TRANSMIT SEQUENCE SO THAT ONLY 
ONE MARK AND THREE SYNCS (226,226,125 FROM TXDB) ARE TRANSMITTED. 

ERROR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN THE 
SEQUENCE. 

BGNTST 



JSR 



PC.INIDMV 



T15:: 

jINIT DMV-11, ENTER M-LOOP 



JSR R5.INITRN »LOAD 1 SOM, CLK TX LNTIL ACTIVE 

DDCMP J IDLES INOCHK! SYNCH jSET DDCMP, STRIP, IDLE, NO CHECK .SYNCH-226 





BCC 
ERROR 



.♦8. 

ESCAPE TST 



JSR R5.TXCHAR 

SYNCH 

7. 

BCC . *8. 

ERROR 

ESCAPE TST 



JSR 
125 
8. 



R5,TXCHAR 



i USE 8 BIT CHARS 

I BR IF NO ERROR 

j REPORT STACKED ERROR 

j SKIP TO END OF TEST 



jLOAD 2ND SYNCH. TX 1ST SYNCH 

i BR IF NO ERROR 

t REPORT STACKED ERROR 

jSKIP TO END OF TEST 
;LOAD 125, TX 2ND SYNCH 



TRAP 



C$ERROR 



TRAP CIESCAPE 
.WORD 1.10046 -. 



TRAP 



C*ERROR 



TRAP CiESCAPE 
.WORD L 10046 -. 



CNOMCAO DMV11 LINE UNIT DIAGL 
TEST 15 - BCP TX RESET W/IDLE 



r 1 1 

MACRO M1200 22 FF.B-84 15:31 PAGE 80-1 



* 1 



SEQ 01.55 



5236 

5237 

5238 



5239 
5240 
5241 
5242 
5243 
5244 

5245 



5246 
5247 
5248 
5249 
5250 

5251 



5252 
5253 
5254 
5255 
5256 
5257 
5258 

5259 



5260 
5261 
5262 
5263 

5264 



5265 



5266 



025040 
025042 
025042 
025044 
025044 
025046 

025050 
025054 
025056 
025060 
025062 
025062 
025064 
025064 
025066 

025070 
025074 
025076 
025100 
025100 
025102 
025102 
025104 

025106 
025112 
025114 
025116 
025120 
025122 
025122 
025124 
025124 
025126 

025130 
025134 
025136 
025136 
025140 
025140 
025142 
025144 
025144 
025144 



103003 

104460 

104410 
000076 

004537 007676 
000377 
000010 
103003 

104460 

104410 
000056 

004537 011364 

OOOOCO 

103003 

104460 

104410 
000040 

004537 010110 

000125 

000000 

000010 

103003 

104460 

104410 
000016 

004537 005126 
103003 

104460 

104410 
000002 



104401 



BCC 
ERROR 


.♦8. 


ESCAPE 


TST 


JSR 

377 

8. 

BCC 

ERROR 


R5.TXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 


BCC 
ERROR 


R5,RCV1ST 

.♦8, 


ESCAPE 


TST 


JSR 

125 



8. 

BCC 

ERROR 


R5.RXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 
BCC 
ERROR 


R5.RSTCHK 


ESCAPE 


TST 



jBR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{LOAD 377, TX 125 



{BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{CLOCK AND RCV 125 

{BR IF NO ERROR 
{REPORT STACKED ERROR 



TRAP 

TRAP 
♦ WORD 



TRAP 

TRAP 
.WORD 



TRAP 



{SKIP TO END OF TEST 

{READ AND CHECK FOR TXDB 125 SYNC 



TRAP 
.WORD 



i BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO ENO OF TEST 



{RESET USYRT/VERIFY SAME 
j BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO ENO OF TEST 



ENOTST 



H0O46: 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 

.WORD 



TRAP 



CfERROR 

C*E SCAPE 

L 10046- . 



C TERROR 

CJESCAPE 
L10046-. 



C $ ERROR 

C$ESCAPE 
L10046-. 



CiERROP 

CIESCAPE 
L 10046 -. 



C$ERROR 

C5ESCAPE 
L 10046 -. 



C*ETST 



CNDMCAO 

TEST 16 

5284 



Gil 

DMV11 LINE UNIT DIAG1 MACRO M1200 22 FEB -84 15:31 PAGE 81 
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SEQ 0136 



.SBTTL TEST 16 



BCP TX UNDERRUN W/TSOM TERMINATION 



5285 
5286 
5287 
5288 
5289 
5290 
5291 

5292 



5293 
5294 
5295 
5296 
5297 

5298 



5299 
5300 
5301 
5302 
5303 
5304 

5305 



5306 
5307 



025146 
025146 

025152 
025156 
025 160 
025162 
025164 
025164 
025166 
025166 
025170 

025172 
025176 
025200 
025202 
025202 
025204 
025204 
025206 

025210 
025214 
025216 

025220 
025222 
025222 
025224 
025224 
025226 



004737 005420 

004537 007400 
04 7626 
040000 
103003 

104460 

104410 
000462 

004537 007116 

000000 

103003 

104460 

104410 
00O444 

004537 007256 
000007 
000151 
103003 

104460 

104410 
000424 



* ******* ******f**«i***4i*******A4.*****4>^A*4>*4i*4i*«**»*****4***«4t***4>jf****4i*444<*^ 



TEST 16 



BCP TX UNDERRUN W/TSOM TERMINATION 



THE USYRT 
CONTROLLED 
HAVE BEEN 
USYRT. NO 
CONDITION. 
EXPECTED 



IS INITIALIZED FOR BCP WITH IDLE • 1 ANO TXC IS MANUALLt 
UNTIL TWO SYNC CHARACTERS A, JO ONE DATA CHARACTER (000) 
TRANSMITTED. AT THIS TIME WHEN TXBE IS ASSERTED BY THE 
DATA IS LOADED INTO TXDB FORCING AN UNOER RUN 
TXU ANO TERR ARE CHECKED BOTH BEFORE ANO AFTER THEIR 
ASSERTIONS. AFTER THE FIRST NON-DATA CHARACTER (WHICH 



SHOULD BE THE MARK CHARACTER) HAS BEEN STARTED, IDLE IS SET TO 0. 
THIS SHOULD FORCE THE NEXT NON-DATA CHARACTER TO BE A SYNC CHARACTER 
FROM S/AR. WHILE THIS SYNC CHARACTER IS BEING TRANSMITTED. TSOfl IS 

* ASSERTED (CLEARING TXU ANO TERR) ~- IDLE IS LEFT AT 0. TXBE IS THEN 

* CYCLED THROUGH AT LEAST ONE MORE SYNC CHARACTER ANO THE TEST IS 

* ABORTED. ERROR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS 

* WITHIN THE SEQUENCE. 

* NOTE: BITS SHIFT OUT OF TX LSB FIRST. 
* 

. ~ ****************************************************************** ********* 



BGNTST 
JSR 



PC.INIDMV 



JSR R5,INITRN 

DDCMP ! IDLES ! NOCHK .» SYNCH 

NORXEN 

BCC . *8. 

ERROR 

ESCAPE TST 



JSR 


R5.CHKTS0 







BCC 


. f8. 


ERROR 





ESCAPE TST 



T16: J 
jINIT DMV-11, ENTER M-LOOP 

j LOAD 1 SOM, CLK TX UNTIL ACTIVE 

{SET DDCMP, STRIP, IDLE, NO CHECK, SYNCH- 226 

jUSE 8 BIT CHARS, RECEIVER DISABLED 

jBR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP CiERROR 

j SKIP TO END OF TEST 

TRAP CIESCAPE 
.WORD L 10047 -. 

{CHECK 1ST BIT OF EXPECTED "SYNCH" 

, CHARACTER (SHOULD BE 0) 

j BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP CiERROR 

5 ANO EXIT TEST 

TRAP Cf ESCAPE 
.WORD L 10047 -. 



JSR 


R5, SERIAL 


{READ REMAINING 7 BITS OF "SYNCH" CHARACTER 


7. 




; (OFF OF TSO BIT) 




151 




{ EXPECTED BIT SEQUENCE (0010110) 




BCC 


.♦8. 


;BR IF NO ERROR 




ERROR 




{REPORT STACKED ERROR 








TRAP 


CSERROR 


ESCAPE 


TST 


{AND EXIT TEST 








TRAP 


C*ESCAPE 






.WORD 


L 10047 -. 



025230 004537 003734 



JSR 



R5.WRITEI 



{LOAD 1ST OATA CHARACTER (000) 



1 L 
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5308 025234 


120402 




5309 025236 


000000 




5310 






5311 025240 


004537 


010010 


5312 025244 


000000 




5313 025246 


000000 




5314 






5315 025250 


004^37 


007256 


5316 025254 


000010 




5317 025256 


000151 




5318 025260 


103003 




5319 025262 






025262 


104460 




5320 025264 






025264 


104410 




025266 


000364 




5321 






5322 






5323 






5324 025270 


004537 


005432 


5325 025274 


0O0U4 




5326 025276 


103003 




5327 025300 






025300 


104460 




5328 025302 






025302 


104410 




025304 


000346 




5329 






5330 025306 


004537 


003610 


5331 025312 


120403 




5332 025314 


OOOOOO 




5333 025316 


133727 


025314 000200 


5334 025324 


001406 




5335 025326 






025326 


104455 




025330 


0OO061 




02535,? 


014357 




025334 


017722 




5336 025336 






025336 


104410 




025340 


000312 




5337 






5338 






5339 






5340 025342 


0O4537 


007256 


5341 025346 


000010 




5342 025350 


OOOOOO 




5343 025352 


103003 




5344 025354 






025354 


104460 




5345 025356 






025356 


104410 




025360 


000272 




5346 






5347 025362 


004537 


011614 


5348 025366 


00000 i 





TDSRL 
000 




JSR 
000 



R5.TXCTRL 


JSR 

8. 

151 

BCC 

ERROR 


R5, SERIAL 

.♦8. 


ESCAPE 


TST 



j CLEAR TSOM 



j READ 2ND SYNCH CHARACTER VIA TSO 
8 3IT CHAR/CLOCK TICKS 
EXPECTED BIT SEQUENCE (010010110) 
BR IF NO ERROR 
j REPORT STACKED ERROR 

TRAP 
{AND EXIT TEST 

TRAP 
.WORD 



VERIFY THAT TXU AND TERR SITS ARE ZERO AT THIS POINT 



JSR R5.CKUSTS 
TXACT'TBMT'TSO 
BCC . *8. 
ERROR 

ESCAPE TST 



10$ 



JSR 


R5,READI 


TOSRH 




000 




BITB 


10$,*6IT7 


BEQ 


15$ 


GEDF 


EM98.ERR12 



ESCAPE TST 



j CHECK USYRT STATUS 

j FOR TRANSMITTER ACTIVE (NO TXU YET!) 

;BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP 

;SKIP TO ENO OF TEST 

TRAP 
.WORD 

{GET TX ERROR BIT (TO SEE IF SET) 

i TERR BIT IS IN TOSRH 
TDSRH STORED HERE 
CHECK TERR BIT 

BR IF TERR NOT SET 
REPORT ERROR: "TERR NOT CLEAR" 

"DEVICE FATAL" ERROR 49 

TRAP 
.WORD 
.WORD 
.WORD 

TRAP 
.WORD 



j AND EXIT TEST 



j NOW READ 1ST DATA CHARACTER 
X5$: JSR R5, SERIAL 



(AND CHECK TERR-1 , TXU-1 ) 



JSR 

8. 

000 

BCC 

ERROR 

ESCAPE 



JSR 

1 



. *8. 

TST 

R5,STEPLU 



iREAD DATA CHARACTER (000) VIA TSO 

j 8 BIT CHAR/CLOCK TICKS 

x EXPECTED BIT SEQUENCE (00000000) 

i BR IF NO ERROR 

jREPORT STACKED ERROR 

TRAP 
{AND EXIT TEST 

TRAP 

.WORD 
{GENERATE 1 TICK TO UNDERRUN TX 



SEQ 0157 



C$ERROR 

C$ESCAPE 
110047- . 



C$ERR0R 

C$ESCAPE 
L1O047-. 



C$ERDF 
49 

EMS8 
ERR12 

CSESCAPE 
L 10047 -. 



C$ ERROR 

C$ESCAPE 
L1O047-. 



1 1. L 
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5349 
5350 
5351 
5352 
5353 

5354 



5355 
5356 
5357 
5358 
5359 
5360 
5361 



5362 



5363 
5364 
5365 
5366 
5367 
5368 
5369 

5370 



5371 
5372 
5373 
5374 
5375 
5376 

5377 



5378 
5379 
5380 
5381 
5382 
5383 
5384 
5385 
5386 
5387 
5388 
5389 



025370 
025374 
025376 
025400 
025400 
025402 
025402 
025404 

025406 
025412 
025414 
025416 
025424 
025426 

025426 
025430 
025432 
025434 
025436 
025436 
025440 



025442 
025446 
025450 
025452 
025452 
025454 
025454 
025456 

025460 
025464 
025466 
025470 
025472 
025472 
025474 
025474 
025476 



025500 
025504 
025506 

025510 
025514 
025516 
025520 
025522 



004537 005432 

000116 

103003 

104460 

104410 
000246 

004537 003610 

120403 

000000 

133727 025414 

001006 



104455 
0O0062 
014404 
017722 

104410 
000212 



004537 007116 

000001 

103003 

104460 

104410 
000174 

004537 007256 
000007 
000177 
103003 

104460 

104410 
000154 



004537 003734 
120405 

000107 



004537 

000010 
0003 77 
103003 



JSR R5.CKU5TS 
TBMT!TSO»TXACT|TXU 
BCC . *8. 
ERROR 

ESCAPE TST 



{CHECK USYRT STATUS 

} FOR TBMT AND TX UNDERRUN 

{BR IF NO FRROR 

{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 



TRAP 
.WORD 



000200 



20$: 



JSR 


R5.READI 


TOSRH 




000 




BITB 


20$,08IT7 


BNE 


25$ 


GEDF 


EM99.ERR12 



GET TX ERROR BIT (TO SEE IF SET) 

TERR BIT IS IN TDSRH 

TDSRH STORED HERE 
CHECK TERR BIT 

BR IF TERR IS SET 
REPORT ERROR: "TERR NOT SET" 
"DEVICE FATAL" ERROR * 



ESCAPE TST 



{AND EXIT TEST 



50 
TRAP 
.WORD 
.WORD 
.WORD 

TRAP 
.WORD 



; NOU CHECK MARK CHARACTER 
25$j JSR R5»CHKTS0 

.♦8. 



(RESULT OF UNDERRUNNING TRANSMITTER) 



JSR 
1 

BCC 
ERROR 



{CHECK 1ST BIT OF EXPECTED "MARK" 
} CHARACTER (BIT SHOULD -1) 
{BR IF NO ERROR 
{REPORT STACKED ERROR 



ESCAPE TST 



JSR 

7 

177 

BCC .*8. 

ERROR 

ESCAPE TST 



R5 # SERIAL 



SEQ 0138 



CSERROR 

CJESCAPE 
L1004 7-. 



CJERDF 
50 

EM99 
ERR12 

C*ESCAPE 
L1004?-, 



TRAP 


CtERROR 


{AND EXIT TEST 




TRAP 


CJESCAPE 


.WORD 


L10047-. 


{READ MARK CHARACTER VIA TSO 




{ 7 BIT CHAR/CLOCK TICKS 




j EXPECTED BIT SEQUENCE C 1111111) 




jBF IF NO ERROR 




{REPORT STACKED ERROR 




TRAP 


C TERROR 


{AND EXIT TEST 




TRAP 


C1ESCAPE 


.WORD 


L10047-. 



j SET IDLE-O, VERIFY SYNCH CHARACTER IS OUTPUT 



JSR R5.WRITEI 

PCSARH 

PROTO'XYZ 



007256 



JSR 

8. 

377 

BCC 

ERROR 



R5, SERIAL 
.♦8, 



{SET IDLE BIT-0 



{READ MARK CHARACTER VIA TSO 

; 8 BIT CHAR/CLOCK TICKS 

j EXPECTED BIT SEQUENCE (11111111) 

; BR IF NO ERROR 

{REPORT STACKED ERROR 



Jl L 
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SEQ 0139 



5390 



5391 
5392 
5393 
5394 
5395 
5396 

5397 



5398 
5399 
5400 
5401 
5402 
5403 
5404 
5405 
5406 
5407 
5408 

5409 



5410 
5411 
5412 
5413 
5414 
5415 
5416 



5417 



5418 
5419 
5420 
5421 
5422 
5423 
5424 
5425 

5426 



5427 



025522 
025524 
025524 
025526 

025530 
025534 
025536 
025540 
025542 
025542 
025544 
025544 
025546 

025550 

025554 
025556 



025560 
025564 
025566 
025570 
025570 
025572 
025572 
025574 

025576 
025602 
025604 
025606 
025614 
025616 

025616 
025620 
025622 
025624 
025626 
025626 
025630 



025632 
025636 
025640 
025642 
025644 
025644 
025646 
025646 
025650 
025652 



104460 

104410 
000124 

004537 007256 
000010 
000151 
103003 

104460 

104410 
000104 

004537 010010 

0OC001 

000000 



004537 005432 

000014 

103003 

104460 

104410 
000056 

004537 003610 

120403 

000000 

133727 025604 
001406 



104455 
000063 
014357 

017722 

104410 
000022 



004537 007256 

000010 

000151 

103003 

104460 

104410 
000002 



TRAP 



C5ERR0R 



000200 



ESCAPE 


TST 


jAND EXIT TEST 


TRAP 

.WORD 


CtESCAPE 
L10047-. 


JSR 


R5, SERIAL 


;READ SYNCH CHARACTER VIA TSO 




8. 




5 8 BIT CHAR/CLOCK TICKS 






151 




l EXPECTED BIT SEQUENCE C010010UO) 




BCC 


.♦8. 


:BR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


C$ERROR 


ESCAPE 


TST 


;AND EXIT TEST 


TRAP 
.WORD 


C$ESCAPE 
L10047-. 


JSR 


R5.TXCTRL 


j* ASSERT TSOM C SHOULD CLEAR 


TXU, TERR) 




TSOM 




}♦ 











;* 






l VERIFY THAT TXU AND TERR BITS 


ARE ZERO AT THIS POINT 






JSR 


R5.CKUSTS 


;CHfcCK USYRT STATUS 






TXACT'TSO 


; FOR TRANSMITTER ACTIVE (NO 


TXU YET!) 




BCC 


.♦8. 


;BR IF NO ERROR 






ERROR 




; REPORT STACKED ERROR 


TRAP 


C$ERR0R 


ESCAPE 


TST 


j SKIP TO END OF TEST 


TRAP 
.WORD 


C$ESCAPE 
L10047-. 


JSR 


R5,READI 


jGET TX ERROR BIT (TO SEE IF 


SET) 




TDSRH 




i TERR BIT IS IN TDSRH 






17$: 000 




5 TDSRH STORED HERE 






BITB 


17$,*BIT7 


i CHECK TERR BIT 






BEQ 


18$ 


; BR IF TERR NOT SET 






GEDF 


EM98.ERR12 


; REPORT ERROR: "TERR NOT CLEAR" 








I "DEVICE FATAL" ERROR 


* 51 
TRAP 
.WORD 
.WORD 
.WORD 


CtERDF 
51 

EM98 
ERR12 


ESCAPE 


TST 


j AND EXIT TEST 


TRAP 
.WORD 


C$ESCAPE 
L10047-. 


, READ/CHECK FOR 


SYNCH CHARACTER 









18$ 



JSR 

8. 

151 

BCC 

ERROR 



R5, SERIAL 



.♦8. 



ESCAPE TST 



ENDTST 



jREAD .'SYNCH! CHARACTER VIA TSO 

l 8 BIT CHAR/CLOCK TICKS 

I EXPECTED BIT SEQUENCE (10010110) 

j BR IF NO ERROR 

j REPORT STACKED ERROR 

TRAP 

} AND EXIT TEST 

TRAP 
.WORD 



C$ERR0R 

CiESCAPE 
110047- . 
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SEQ 0140 



025652 
025652 



104401 



L 1004 7: 



TRAP 



C*fcT$T 
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SEQ 0141 



5444 
5445 
5446 
5447 
5448 
5449 
5450 

5451 



5452 
5453 
5454 
5455 
5456 

5457 



5458 
5459 
5460 
5461 
5462 
5463 

5464 



5465 
5466 
5467 
5468 



025654 
025654 

025660 
025664 
025666 
025670 
025672 
025672 
025674 
025674 
025676 

025700 
025704 
025706 
025710 
025710 
025712 
025712 
025714 

025716 

025722 
025724 
025726 

025730 
025730 
025732 
025732 
025734 

025736 

025742 
025744 



004737 

004537 
047626 
040000 
103003 

104460 

104410 
000354 

004537 
000000 
103003 

104460 

104410 
000336 

004537 
000007 
000151 
103003 

104460 

104410 
000316 

004537 
120402 
000000 



005420 
007400 



007116 



007256 



; + 
J * 

: * 
J* 

{* 

* 

* 

* 
+ 

* 



THE USYRT 13 INITIALIZED FOR BCP WITH IDLE - 1 AND TXC IS MANUALLY 
CONTROLLED UNTIL TWO SYNC CHARACTERS AND ONE DATA CHARACTER HAVE 
BEEN TRANSMITTED. AT THIS TIME WHEN TXBE IS ASSERTED BY THE USYRT, 
NO DATA IS LOADED INTO TXDB -- FORCING AN UNDER RUN CONDITION. TXU 
AND TERR ARE CHECKED BOTH BEFORE AND AFTER THEIR EXPECTED 
ASSERTIONS. AFTER THE FIRST NON-DATA CHARACTER (WHICH SHOULD BE THE 
MARK CHARACTER) HAS BEEN STARTED, IDLE IS SET TO 0. THIS SHOULD 
FORCE THE NEXT NON-DATA CHARACTER TO BE A SYNC CHARACTER. 
IMMEDIATELY AFTER THIS SYNC CHARACTER HAS BEING TRANSMITTED, A 
PROGRAM RESET IS ISSUED AND ALL REGISTERS ARE CHECKED. ERROR 
LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN THE 
SEQUENCE. 

~ ****** *4^*****************************^ 

BGNTST 

T17:: 
JSR PC.INIDMV jINIT DMV-11, ENTER M-LOOP 

JSR R5.INITRN {LOAD 1 SOM, CLK TX IMTIl. ACTIVE 

DDCMP! IDLES INOCHK! SYNCH ;SET DOCMP, STRIP , IDLE .NO CHECK , SYNCH-226 



003734 



NORXEN 




{USE 8 BIT CHARS, RECEIVER DISABLED 




BCC 


.+6. 


;BR IF NO ERROR 




ERROR 




{REPORT STACKED ERROR 








TRAP 


C (ERROR 


ESCAPE 


TST 


j SKIP TO END OF TEST 








TRAP 


CtESCAPE 






.UORD 


L10050-. 


JSR 


R5.CHKTS0 


{CHECK 1ST BIT OF EXPECTED "SYNCH" 









I CHARACTER (SHOULD BE 0) 




BCC 


.♦8. 


{BR IF NO ERROR 




ERROR 




{REPORT STACKED ERROR 








TRAP 


C TERROR 


ESCAPE 


TST 


{AND EXIT TEST 








TRAP 


CiESCAPE 






.WORD 


I 10O50-. 


JSR 


R5, SERIAL 


{READ REMAINING 7 BITS OF "SYNCH" CHARACTER 


7. 




t (OFF OF TSO BIT) 




151 




j EXPECTED BIT SEQUENCE (0010110) 




BCC 


,♦8. 


j BR IF NO ERROR 




ERROR 




{REPORT STACKED ERROR 








TRAP 


C*ERROR 


ESCAPE 


TST 


{AND EXIT TEST 








TRAP 


CiESCAPE 






.WORD 


L 10050 -, 


JSR 


R5.WRITEI 


{LOAD 1ST DATA CHARACTER (000) 




TDSRL 








000 









M 1. i 
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5469 
5470 

5471 
54 72 
54 73 
5474 
5475 
5476 
5477 
5478 

5479 



5480 
5481 
5482 
5483 
5484 
5485 
5486 

5487 



5488 
5489 
5490 
5491 
5492 
5493 
5494 



5495 



5496 
5497 
5498 
5499 
5500 
5501 
5502 
5503 

5504 



5505 
5506 
5507 
5508 
55Q9 



025746 
025752 
025754 

025756 
025762 
025764 
025766 
025770 
025770 
025772 
025772 
025774 



025776 
02600? 
026004 
026006 
026006 
026010 
026010 
026012 

026014 

026020 
026022 
026024 
026032 
026034 

026034 
026036 
026040 
026042 
026044 
026044 
026046 



026050 
026054 
026056 
026060 
026062 
026062 
026064 
026064 
026066 

026070 
026074 



004537 010010 

000000 

000000 

004537 007256 
000010 
000151 
103003 

104460 

104410 
000256 



004537 005432 

000114 

103003 

104460 

104410 
000240 

004537 003610 

120403 

000000 

133727 026022 000200 

001406 



104455 
000064 
014357 
017722 

104410 
000204 



004537 007256 
00O010 

oooooo 

103003 

104460 

104410 
000164 

004537 011614 
000001 



JSR 


R5.TXCTRL 


j CLEAR TSOM 


000 







JSR 


R5, SERIAL 


{READ 2ND SYNCH CHARACTER VIA TSO 


8. 




i 8 BIT CHAR/CLOCK TICKS 


151 




j EXPECTED BIT SEQUENCE C010010110) 


BCC 


. *8. 


;BR IF NO ERROR 


ERROR 




{REPORT STACKED ERROR 

TRAP 


ESCAPE 


TST 


{AND EXIT TEST 

TRAP 
.WORD 



VERIFY THAT TXU AND TERR BITS ARE ZERO AT THIS POINT 



JSR R5.CKUSTS 
TXACT!TBMT!TSO 
BCC .f8. 
ERROR 

ESCAPE TST 



10$! 



JSR 


R5.READI 


TDSRH 




000 




BITB 


10$,aeiT7 


BEQ 


15$ 


GEDF 


EM98.ERR12 



ESCAPE TST 



jCHECK USYRT STATUS 

5 FOR TRANSMITTER ACTIVE CNO TXU YET!) 

{BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP 

I SKIP TO END OF TEST 

TRAP 
.WORD 

{GET TX ERROR BIT (TO SEE IF SET) 

{ TERR BIT IS IN TDSRH 

{ TDSRH STORED HERE 

{CHECK TERR BIT 

j BR IF TERR NOT SET 

{REPORT ERROR: "TERR NOT CLEAR" 

j "DEVICE FATAL" ERROR * 52 

TRAP 
.WORD 
.WORD 
.WORD 

{AND EXIT TEST 

TRAP 
.WORD 



NOW READ 1ST DATA CHARACTER (AND CHECK TERR-l.TXU-1) 



15* i 



026076 004537 005432 



JSR 

8. 

000 

BCC 

ERROR 


R5, SERIAL 


ESCAPE 


TST 


JSR 

1 


R5.STEPLU 


JSR 


R5.CKUSTS 



{READ DATA CHARACTER (OOO) VIA TSO 

; 8 BIT CHAR/CLOCK TICKS 

{ EXPECTED BIT SEQUENCE (00000000) 

i BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP 

{AND EXIT TEST 

TRAP 
.WORD 

{GENERATE 1 TICK TO UNDERRUN TX 
{CHECK USYRT STATUS 



SEQ 0142 



CiERROR 

CifcSCAPE 
L10050-. 



C*ERROR 

C*ESCAPE 
L10050-. 



CfERDF 
52 

EM98 
ERR12 

C$ESCAPE 
L 10050 -. 



C*ERROR 

CJFSCAPE 
L 10050 -, 
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5510 
5511 
5512 

5513 



5514 
5515 
5516 
5517 
5518 
5519 
5520 



5521 



5522 
552;*> 
5524 
5525 
5526 
5527 
5528 
5529 
5530 
5531 
5532 

5533 



5534 
5535 
5536 
5537 
5538 
5539 

5540 



5541 
5542 
5543 
5544 
5545 
5546 
5547 
5548 
5549 



026102 
026104 
026106 
026106 
026110 
026110 
026112 

026114 
026120 
026122 
026124 
026132 
026134 

026134 
026136 
026140 
026142 
026144 
026144 
026146 



026150 
026154 
026156 

026160 
026164 
026166 
026170 
026170 
026172 
026172 
026174 

026176 
026202 
026204 
026206 
026210 
026210 
026212 
026212 
026214 



026216 
026222 
026224 
026226 
026230 
026230 



000116 
103003 

104460 

104410 
000140 

004537 003610 

120403 

000000 

133727 026122 000200 

001006 



TBMT!T50!TXACT!TXU 
BCC . f8. 
ERROR 

ESCAPE TST 



? FOR TBMT AND TX UNDERRUN 
jBR IF NO ERROR 

{REPORT STACKED ERROR 

iSKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



20$: 



JSR 


R5 t f: ;;!. 


TDSRH 




000 




BITB 


20*,#8IT7 


BNE 


25$ 


GEDF 


EM99.ERR12 



104455 
00CO65 
014404 
017722 

104410 
000104 



004537 003734 

120405 

000107 

004537 007116 

OOOOOl 

103003 

104460 

104410 
000056 

0?4537 007256 
000007 
000177 
103003 

104460 

104410 
000036 



004537 007256 
000010 
0GO151 
103003 

104460 



ESCAPE TST 



{GET TX ERROR BIT (TO SEE IF SET) 

; TERR BIT IS IN TDSRH 

} TDSRH STORED HERE 

{CHECK TERR BIT 

j BR IF TERR IS SET 

{REPORT ERROR; "TERR NOT SET" 

; "DEVICE FATAL" ERROR # 5? 

TRAP 
.WORD 
■ WORD 
.WORD 

{AND EXIT TEST 

TRAP 
.WORD 



25$ 



JSR R5.WRITEI 

PCSARH 

BIT6!BIT2!BIT1}BIT0 



JSR 
1 

BCC 
ERROR 



R5.CHKTS0 
.♦8. 



ESCAPE TST 



JSR 

7 

177 

BCC .*6. 

ERROR 

ESCAPE TST 



R5. SERIAL 



{CHECK 1ST BIT OF EXPECTED "MARK" 

{ CHARACTER (BIT SHOOLD-1) 

{BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP 

{AND EXIT TEST 

TRAP 
.WORD 

{READ MARK CHARACTER VIA TSO 

{ 7 BIT CHAR/CLOCK TICKS 

{ EXPECTED BIT SEQUENCE (1111111) 

j BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP 

jAND EXIT TEST 

TRAP 
.WORD 



READ/CHECK FOR SYNCH, Kl.SET/CHECK USYRT REGISTERS 



JSR 

8. 

151 

BCC 

ERROR 



R5, SERIAL 



.♦8. 



iREAD SYNCH CHARACTER VIA ISO 

; 6 BIT CHAR/CLOCK TICKS 

j EXPECTED BIT SEQUENCE (00000000) 

jBR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP 



SEQ 0143 



CiERROR 

CSESCAPE 
L 10050 ~, 



C$E«DF 
53 
EM99 
ERR12 

C$ESCAPE 
L 10050 -. 



NOW CHECK MARK CHARACTER (RESULT OF UNDERRUNNING TRANSMITTER) 

{CLEAR IDLE BIT 
{DDCMP FORMAT, NO ERROR CHECKING 



C *ERROR 

CSESCAPE 
L10050-, 



C* ERROR 

CiFSCAPE 
L 10050 -. 



C$ERROR 
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5550 026252 
026252 
026254 

5551 

5552 026256 

5555 026242 

5554 026244 
026244 

5555 026246 
026246 
026250 

5556 026252 
026?52 
026252 
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F.5CAPF 1ST 
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j 



104410 
000016 

00455/ 
105005 

104460 

104410 
000002 



104401 



005126 



JSR 

BCC 
FRROR 



R5.RSTCMK 



fcSCAPt ^5T 



I AND EXIT TF5T 



i reset us».^r/vrRif t same 

jBR U NO FRROfc 

jRFPORT STACKF.D FRROR 

j'jKIP TQ tND 0* TE5V 



fcNOTST 



r >FQ 0144 



L 10050 j 



TRAP 
.WORD 



TRAP 
TRAP 

,uo«n 



TRAP 



CltSCAPF 
1.10050- . 



CURROR 

cusopf 

! 10050 , 



CSETOT 
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sto 0145 



5569 

5570 

5571 
5572 
5573 

5574 
5575 
5576 

5577 



5578 
5579 
5580 
5581 
558? 
5583 
5584 
5585 
5586 
5587 
5588 
5589 
5590 
5591 



592 



or 



5593 
5594 

5595 
5596 

5597 
5598 

5599 



026254 

026254 

026260 
026264 
026266 
026270 
026272 
0262? 2 
026274 
026274 
026276 

026300 
026304 
026506 

026310 
026314 
026316 

026320 
026324 
026326 
02633O 
026332 
026332 
026334 
026334 
026336 

026340 
026344 
026346 
026350 
026352 
026352 
026354 



004737 

004537 
043626 
OOOOOO 

103003 

104460 

104410 
0O0162 

004537 
000001 
000007 

004537 

OOOOOO 
OOOOOO 

004537 
0O0125 
OOOOIO 
103003 

104460 

104410 
0O0122 

004537 
00025? 
OOOOOO 

103003 

104460 



005420 
007400 



010010 



010010 



007676 



007676 



.5BTTI. TEST 16 BCP TX DISABLE ft. ST 



TEST 18 



BCP TX DISABl {- TEST 



THE USYRT IS INITIALIZED F OR BCP ANO A MESSAGE IS STARTED. ONCE THE 
5EC0N0 DATA CHARACTER IS LOADED INTO TXDB TXE IS DROPPED. TXSO V, 
WATCHED TO ASSUME THAT THE CHARACTER BEING, TRANSMUTED IS COUPLE XI . 
UHEN IT IS, THE USYRT SHOULD DROP TXA ANO STOP TRANSMITTING -- THE 
LAST CHARACTER LOADED INTO TXDB SHOULD BE LOST. 

CHARACTERS LOADED; 125 252 

CHARACTERS TRANSMITTED: 125 



UGNTST 



JSR 


PC.INIDMV 


JSR R5,INITRN 

DDCMP'NOCHK! SYNCH 



BCC ,*8, 

ERROR 


ESCAPE 


TST 


JSR 

rson 

7. 


R5.TXCTRL 


JSR 
000 



R5.TXCTRL 


JSR 

125 

8. 

BCC 

ERROR 


R5.TXCHAR 
. »8. 


E5CAPE 


TST 


JSR 
252 


BCC 

ERROR 


R5.TXCHAR 

- »8. 


ESCAPE 


TST 



F18: t 

>INIT DMV 11, ENTER M-l.OOP 

jLOAD 1 SOM, CLK TX UNTIL ACTIVE 

>SEf DOCMP.NO CHECK, SYNCH-226 

j USE 8 BIT CHARS 

j BR IE NO ERROR 

, REPORT STACKED ERROR 

iSKIP TO ENO OE TEST 



TRAP 

TRAP 
.WORD 



jOUTPUT 1ST SrNC CHARACTER 
j ANO KNOCK DOWN TBMT 



iCLEAR TSOM (GET READY TO SEND DATA) 



j LOAD 125, TX 2 NO SYNCH 



j BR IE NO ERROR 

i REPORT STACKED ERROR 

jSKIP TO ENO OT TEST 



I LOAD 252 



jBR V NO ERROCs 

i REPORT STACKED ERROR 

l SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



C* ERROR 

ClESCAPt 
L10051-. 



Ct ERROR 

ClESCAPt 
L10051-. 



TRAP 



C*£RRO« 



n 



i t 
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5600 
5601 
5602 
5603 
5604 
5605 
5606 
5607 
5608 
5609 
5610 
5611 

5612 



5613 
5614 
5615 
5616 
5617 
561S 
5619 

5620 



5621 
5622 
5623 
5624 
5625 
5626 
5627 

5628 



5629 



026354 
026356 

026360 
026364 
026366 

026370 
026374 

026376 
026402 
026404 
026406 
026406 
026410 
026410 
026412 

026414 
026420 
026422 
026424 
026426 
026430 
026430 
026432 
026432 
026434 

026436 
026442 
026444 
026446 
026450 
026452 
026452 
026454 
0264 54 
026456 
026460 
026460 
026460 



104410 
000102 

004537 003734 

120000 

000102 

004537 011614 
000007 

0O4537 011564 

OOOOOO 

103003 

104460 

104410 
000046 

004537 010110 

0O0125 

OOOOOO 

0O0010 

103003 

104460 

104410 
000024 

004537 010110 

000377 

OOOOOO 

000010 

103003 

104460 

104410 
000O02 



1044QI 



JSR R5,URITEI 

VIAORB 

RXENJTTLOOP 


JSR 
7. 


R5.STEPLU 


JSR 


BCC 
ERROR 


H5.RCV1ST 
. *8. 


ESCAPE 


TST 


JSR 

125 



8. 

BCC 

ERROR 


R5.RXCHAR 


ESCAPE 


TST 


JSR 

377 



8. 

BCC 


R5.RXCHAR 
♦8. 


ERROR 




ESCAPE 


TST 



jDROP TRANSMIT ENABLE CTXE) 



jCl OCK IN 125 
;*♦* 

j CLOCK ANO RCV 125 

j BR IF NO ERROR 
,REP0RT STACKED ERROR 

I SKIP TO END OF TEST 



iREAD ANO CHECK FOR 125 



;AND CLOCK IN NEXT CHAR, 

I BR IE NO ERROR 

I REPORT STACKED ERROR 

j SKIP TO ENO Of TEST 



I RAP 
.JORU 



TRAP 

TBAP 
.WORD 



TRAP 



TRAP 
.WORD 



iREAD AND CHECK FOR 377 

!*♦ IF 252 IS REAO, THEN DROPPING 

j** TXEN DIDN' T WORK •!! 



.i'.R IF NO ERROR **** 

J -PORT STACKED ERROR ***♦ 

I SKIP TO END QF TEST **** 



ENOTST 



LiOO&l: 



TRAP 

TRAP 
.WORD 



TRAP 



CH'jCAPt 
1.10051- . 



CiERROR 

C$E SCAPE 
L10051- . 



CtERROR 

CIESCAPE 
L 10051- . 



CIERROR 

CiESCAPE 
1.10051 -. 



CILTST 



SFQ 0146 



CNDMCflO 

TEST 19 

5644 



id 
DMV11 LINE UN II DIAtU MACRO M120O S2-FF.B-84 15:31 PAGE 34 

• FIFO STACKING CHARACTERS TEST 

.SBTTL TEST 19 -• FIFO STACKING CHARACTERS TEST 



SEQ 0147 



5645 
5646 
5647 
5648 
5649 
5650 
5651 

5652 



5653 
5654 
5655 
5656 
5657 
5658 
5659 
5660 
5661 
5662 
5663 
5664 
5665 
5666 
5667 
5668 
5669 
5670 

5671 



5672 
5673 



026462 

026462 004737 



026466 
026472 
026474 
026476 
026500 
026500 
026502 
026502 
026504 



026526 
026532 

026536 
026542 
026544 
026546 
026550 
026550 
026552 
026552 
026554 



004537 
043626 
000000 
103003 

104460 

104410 
000216 



026506 004537 

026512 000001 

026514 000007 

026516 004537 

026522 000000 

026524 OOOOOO 



012702 
112237 

004537 
OOOOOO 
100010 
103003 

104460 

104410 
0O0146 



005420 
007400 



010010 
010010 



026724 
026542 

007676 



* TEST 19 -- FIFO SIACKING CHARACTERS TEST 

* 

* THE USYRT IS SETUP FOR BCP MODE WITH NO ERROR DETECTION, 

I* THIS TEST BEGINS BY SYNCHRONIZING THE RECEIVER AND THEN PROCEEDS 

j* TO FILL THE 8 CHARACTER RECEIVER FIFO WITH THE CHARACTERS: 

j* 1/2C SYNCH) ,000, 377, 125, 252, 347 ,030, 303,1/2(074). 

S* THESE CHARACTERS ARE THEN READ OFF OF THE FIFO AND CHECKED. NOTE 

;* THAT NO CLOCKS ARE PROVIDED WHEN RECEIVING THE CHARACTERS SINCE THEf 

j* ARE SLPPLIED BY THE FIFO SUPPORT LOGIC IN GROUPS OF 4 TICKS (WHEN 

I* RDA - 0). 

* ALSO NOTE THAT DUE TO FIFO TIMING, TWO 'HALF CHARACTERS' ARE LOADED 

* INTO THE FIFO (THE 1ST ANO LAST CHARACTERS). 

J* 

-4****4 ********************************* ********************* *************** 



BGNTST 

JSR PCINIDMV 

JSR R5,INITRN 

DDCMP'NOCHK! SYNCH 



BCC .+8. 

ERROR 

ESCAPE TST 



T19:: 
jINIT DMV-11, ENTER M-LOOP 

;LOAD 1 SOM, CLK TX UNTIL ACTIVE 
;SET DDCMP,N0 CHECK , SYNCH -226 
jUSE 5 BIT CHARS 
;BR IF NO ERROR 
{REPORT STACKED ERROP 

jFKIP TO END OF TEST 



JSR 

TSOM 

7. 

JSR 

000 





R5,TXCTRL 
R5,TXCTRL 



; OUTPUT 1ST SYNC CHARACTERS 

I 

: CLEAR TSOM 



j FILL THE FIFO WITH CHARACTERS (DATA1 - DATA8) 



i - 
5$: 

10$ 



MOV *TXTBL3.R2 

MOVB (R2)»,10* 

JSR R5,TXCHAR 

000 

NCTBMT*256, !8. 

BCC .♦a. 

ERROR 

ESCAPE TST 



;SET UP TABLE POINTER 

l SETUP TRANSMIT CHARACTER 

j TRANSMIT A CHARACTER 

j** HOLE FOR NEXT TX CHARACTER 

jNO CHECK OF INITIAL TBMT-0 



I BR 



NO ERROR 



tREPORT STACKED ERROR 
j SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
,WORD 



Cf ERROR 

CIESCAPE 
L10052-, 



C$ERROR 

OESCAPE 
L 10052 -. 



026556 022702 026736 



CMP 



GTXEND3.R2 



ru 



CNDMCAO 


DMV11 LINt UNI1 


DIAG1 MACRO M1200 « 


?2 FEB -84 


15:31 PAGE 84 1 




TEST 19 


FIFO 


STACKING CHARACTERS TEST 










5674 


026562 


001363 




BNE 


5$ 






5675 
















5676 


026564 


00453 7 


011614 


JSR 


R5.STEPLU 


{ADD A FEW TX TICKS TO COMPLETELY 




5677 


026570 


000005 




5 




t FILL UP FIFO. 




5678 
5679 




















; THE 


FIFO IS NOW FULL OF CHARACTERS. 




5680 






j NOW 


READ/VERIFY THEM. 






5681 
5682 






t 










026572 


012702 


026724 


MOV 


*TXTBL3,R2 


;SET UP TABLE POINTER 




5683 


026576 


112237 


026606 15$; 


MOVB 


CR2)*,20$ 


{SETUP EXPECTED CHARACTER 




5684 
















5685 


026602 


004537 


010110 


JSR 


R5.RXCHAR 


{READ £ CHK CHARACTER 




5686 


026606 


000000 


20$: 


000 




{♦♦ HOLE FOR EXPECTED RECEIVE CHAR. 




5687 


026610 


000000 









» 




5688 


026612 


100000 




NOCROA 


;N0 


INITIAL CHECK OF RDA-0 




5689 


026614 


103003 




BCC 


.♦8. 


j BR IF NO ERROR 




5690 


026616 






ERROR 




{REPORT STACKED ERROR 






026616 


104460 








TRAP 


CiERROR 


5691 


026620 






ESCAPE 


TST 


{SKIP TO END OF TEST 






026620 


104410 








TRAP 


CIESCAPE 




026622 


OOOIOO 








.WORD 


L 10052 -, 


5692 
















5693 


026624 


022702 


026734 


CMP 


0TXEND3-2.R2 




5694 


026630 


001362 




BNE 


15$ 






5695 
















5696 


026632 


004537 


011614 


JSR 


R5.STEPLU 


{CLOCK IN LAST FEW CHARACTERS OFF 




5697 


026636 


000015 




15 




; OF FIFO. 




5698 
















5699 


026640 


004537 


010110 


JSR 


R5.RXCHAR 


{READ 6 CHK CHARACTER 




5700 


026644 


000303 




303 








5701 


026646 


000000 













5702 


026650 


100000 




NOCROA 


j NO 


INITIAL CHECK OF RDA-0 




5703 


026652 


103003 




BCC 


.♦8. 


{BR IF NO ERROR 




5704 


026654 






ERROR 




{REPORT STACKED ERROR 






026654 


104460 








TRAP 


CIERROR 


5705 


026656 






ESCAPE 


TST 


{SKIP TO END OF TEST 






026656 


104410 








TRAP 


C*ESCAPE 


5706 


026660 


000042 








.WORD 


L 10052 -. 


5707 


026662 


004537 


010110 


JSR 


R5.RXCHAR 


{READ € CHK CHARACTER 




5 708 


026666 


00O074 




074 








5709 


026670 


000000 













5710 


026672 


10OOOO 




NOCROA 


{NO 


INITIAL CHECK OF RDA-0 




5711 


026674 


103003 




BCC 


.♦8. 


{BR IF NO ERROR 




5712 


026676 






ERROR 




{REPORT STACKED ERROR 






026676 


104460 








TRAP 


CIERROR 


5713 


026700 






ESCAPE 


TST 


{SKIP TO END OF TEST 






026700 


104410 








TRAP 


CIESCAPE 


5714 
5715 


026702 


000020 








.WORD 


L 10052 -. 


026 704 


00453/ 


011532 


JSR 


R5.ENDTRN 


{SHUT DOWN TRANSMITTER. RECEIVER 




5716 


026710 


000010 




8. 








5717 


026712 


103003 




BCC 


.♦8. 


j BR IF NO ERROR 




5718 


026714 






ERROR 




{REPORT STACKED ERROR 






026714 


104460 








TRAP 


CiERROR 


5719 


026716 






ESCAPE 


TST 


{SKIP TO END OF TEST 






026716 


104410 








TRAP 


CSESCAPE 



SEQ 0148 



) 
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TEST 19 - FIFO STACKING CHARACTERS TEST 

ENDTST 



SRQ 0149 





026720 


000002 


5720 


026722 






026722 






026722 


104401 


5721 






5722 


026 724 


226 


5723 


026 725 


226 


5 724 


026726 


000 


5725 


026727 


377 


5726 


026730 


125 


5727 


026731 


252 


5728 


026732 


34 7 


5729 


026733 


030 


5730 


026734 


303 


5731 


026735 


074 


5732 


026736 


000 


5733 






5734 







L 10052: 



WORD 



TRAP 



L 10052 



CJET'jT 



TXTBL3? 


.BYTE 


226 


;S>NCH 




.BYTE 


226 


j SYNCH 




.BYTE 


000 






.BYTE 


37 7 






.BYTE 


125 






.BYTE 


252 






.BYTE 


34 7 






.BYTE 


030 






.BYTE 


303 






.BYTE 


074 




TXEND3: 


.BYTE 


000 




l 


.EVEN 







CNDMCAO DMVll LINE. UNIT DTAG1 
TEST 20 - BCP CHARACTER LENGTH 
5744 



5745 
5746 
5747 
5748 
5749 



5750 
5751 
5752 
5753 
5754 

5755 



5756 
5757 
5758 
5759 
5760 
5761 
5762 
5763 
5764 
5765 
5766 
5767 
5766 
5769 
5770 
5771 

5772 



5773 
5774 
5775 
5776 



026740 
026740 



026744 
026744 
026744 
026746 
026752 
026754 
026756 
026760 
026760 
026762 
026762 
026764 

026766 
026772 

026774 
026776 
027002 
027004 

027006 
027012 

027016 
027022 
027024 
027026 
027030 
027030 
027032 
027032 
027034 

027036 
027042 



104402 
004537 
043626 
0O0245 
103003 

104460 

104410 
000126 

0O4537 
000001 
000004 
004537 
000000 
OOOOCO 

012705 
112337 

004537 
000000 
000005 
103003 

104460 

104410 
000056 

022703 
001363 



MACRO M1200 22 FEB -64 15:31 PAGE 85 
TEST 

.SBTTL TEST 20 -- BCP CHARACTER LENGTH TEST 

• ♦ ♦ ************************************************ ******** ***** **+*+****++*** 

TEST 20 -- BCP CHARACTER LENGTH TEST 



SEQ 01 c jO 



004737 005420 



007400 



010010 



010010 



027436 
027022 

007676 



;♦ 

;* 
i* 
;* 

; + 

* 



THE USYRT IS INITIALIZED FOR BCP WITH NO ERROR CHECKING. TXC IS MANUALLY 
CONTROLLED UNTIL TWO SYNC CHARACTERS HAVE BEEN TRANSMITTED. THEN 3 
SUBTESTS FOLLOW, EACH ONE USING A DIFFERENT TRANSMIT CHARACTER LENGTH 
STARTING AT FIVE (5) AND ENDING WITH SEVEN (7;. 

TEST PATTERN: 111 222 333 044 155 266 37? 
_* ********************************************** ************ ****** ********** 

B6NTST 

T20: : 
JSR PC.INIDMV jINIT UMV-11. ENTER M-LOOP 

SUBROUTINE ♦ 1: 5 BIT CHARACTERS 

BGNSUB 



JSR R5.INITRN 
DDCMP!N0CHK! SYNCH 
BIT7»BIT5!BIT2!BIT0 



027447 





BCC 

ERROR 


.♦8. 




ESCAPE 


SUB 




JSR 

TSOM 

4. 

JSR 

000 




R5.TXCTRL 
R5.TXCTRL 


1 

10$; 


MOV 
MOVB 


*T24TBL,R3 
(R3)»,ll 


11: 


JSR 

000 

5. 

BCC 

ERROR 


R5.TXCHAR 
.♦8. 




ESCAPE 


SUB 




CMP 
BNE 


*T24TBL*9, ,R3 
10$ 



T20.1: 

TRAP CiBSUB 
jLOAD 1 SOM, CLK TX UNTIL ACTIVE 
j SET CHAR MODE, NO ERROR CHECKING , S/AR-226 
;TXCL-RXCL-5 BITS 
; BR IF NO ERROR 
{REPORT STACKED ERROR 



j SKIP TO END OF TEST 

j LOAD 2ND SYNCH, TX 1ST SYNCH 
I CLEAR TSOM 



TRAP 

TRAP 
,WORO 



CiERROR 

CSESCAPE 
L10054-, 



i SET UP DATA TABLE POINTER 
I INSTALL NEXT TX CHARACTER 

•.TRANSMIT CHARACTER C --> RX/FIFO ) 
{♦* HOLE FOR NEXT CHARACTER ** 



j BR IF NO ERROR 
{REPORT STACKED ERROR 

i SKIP TO END OF TEST 



{ALL CHARACTERS TRANSMITTED ? 
; IF NOT, TX ANOTHER ONE 



TRAP 

TRAP 
.WORD 



CtERROR 

CSESCAPE 
L10054-. 



CNOMCAO DMV11 LINE UNIT DIMG1 MACRO M1200 
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ric2 
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SEQ 0151 



5777 


027044 


012703 


027436 


MOV 


4T24TBL.R3 


jSET UP DATA TABLE POINTER 




5778 


027050 


112337 


027066 


40$ j MOVB 


(R3)*,4$ 


{INSTALL NEXT EXPECTED RX CHARACTER 




5779 


027054 


142737 


000340 027066 BICB 


#340,4$ 


(MASK OUT UNTRANSMITTEO BITS 




5780 
















5781 


027062 


004537 


010110 


JSR 


R5.RXCHAR 


; READ/CHECK NEXT CHARACTER 




5782 


027066 


000000 




4$: 000 




}** HOLE FOR NEXT EXPECTED CHARACTER 




5783 


027070 


000000 













5 784 


027072 


100000 




NOCRDA 




;N0 INITIAL CHECK OF RDA-0 




5785 


027074 


103003 




BCC 


.♦8. 


;BR IF NO ERROR 




5786 


027076 






ERROR 




;REPORT STACKED ERROR 






027076 


104460 








TRAP 


C$ERROR 


5787 


027100 






ESCAPE 


SUB 


{SKIP TO END OF TEST 






027100 


104410 








TRAP 


C$ESCAPE 




027102 


000010 








.WORD 


L 10054 -. 


5788 
















5789 


027104 


022703 


027445 


CMP 


ST24TBU7.R3 


;ALL CHARACTERS CHECKED ? 




5790 


027110 


001357 




BNE 


40$ 


j IF NOT, CHECK ANOTHER ONE 




5791 
















5792 


027112 
027112 






EN0SU8 




L10054: 






027112 


104403 








TRAP 


C$ESUB 


5793 
5794 






















; SUBROUTINE 4 


2: 6 BIT CHARACTERS 




5795 
5796 
















027114 






BGNSUB 










027114 










T20.2; 






027114 


104402 








TRAP 


C$BSUB 


5797 


027116 


004537 


007400 


JSR 


R5,INITRN 


{LOAD 1 SOM, CLK TX UNTIL ACTIVE 




5798 


027122 


043626 




DDCMPJNOCHK! SYNCH 


;SET CHAR MODE. NO ERROR CHECKING . S/AR" 


■226 


5799 


027124 


000306 




BIT7!BIT6!BIT2!BIT1 


lTXCL-RXCL-6 BITS 




5800 


027126 


103003 




BCC 


.♦8. 


}BR IF NO ERROR 




5801 


027130 






ERROR 




{REPORT STACKED ERROR 






027130 


104460 








TRAP 


C$ ERROR 


5802 


027132 






ESCAPE 


SUB 


.-SKIP TO END OF TEST 






027132 


104410 








TRAP 


C$ESCAPE 




027134 


000126 








.WORD 


L 10055 -. 


5803 
















5804 


027136 


004537 


010010 


JSR 


R5.TXCTRL 


{LOAD 2ND SYNCH, TX 1ST SYNCH 




5805 


027142 


000001 




TSOM 








5806 


027144 


000005 




5. 








5807 


027146 


004537 


010010 


JSR 


R5.TXCTRL 


{CLEAR TSOM 




5808 


027152 


000000 




000 








5809 


027154 


000000 













5810 
















5811 


027156 


012703 


027436 


MOV 


OT24TBL.R3 


j SET UP DATA TABLE POiNTER 




5812 


027162 


112337 


027172 


20$: MOVB 


CR3)*.2I 


{INSTALL NEXT TX CHARACTER 




5813 
















5814 


027166 


004537 


007676 


JSR 


R5.TXCHAR 


{TRANSMIT CHARACTER ( -•> RX/FIFO ) 




5815 


027172 


000000 




2*: 000 




{♦* HOLE FOR NEXT CHARACTER ** 




5816 


027174 


000006 




6. 








5817 


027176 


103003 




BCC 


. »fl. 


{BR IE NO ERROR 




5818 


02 7200 






ERROR 




{REPORT STACKED ERROR 






027200 


104460 








TRAP 


C$ERRO« 


5819 


027202 






ESCAPE 


SUB 


j SKIP TO END OF TEST 






027202 


104410 








TRAP 


C$ESCAPE 




027204 


000056 








• WORD 


L10055-. 



5820 



■) 
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SEQ 0152 



5821 


027206 


022 703 


027450 


5822 


027212 


001363 




5823 








5824 


027214 


012703 


02 7436 


5825 


027220 


112337 


027236 


5826 


027224 


142737 


000300 


5827 








5828 


027232 


004537 


010110 


5829 


027236 


000000 




5830 


027240 


000000 




5831 


027242 


100000 




5832 


027244 


103003 




5833 


027246 








027246 


104460 




5834 


027250 








027250 


104410 






027252 


OOC010 




5835 








5836 


027254 


022703 


027445 


5837 


027260 


001357 




5838 








5839 


027262 
027262 








027262 


104403 




5840 








5841 








5842 








5843 


027264 
027264 








027264 


104402 




5844 


027266 


004537 


007400 


5845 


027272 


043626 




5846 


027274 


000547 




5847 


027276 


103003 




5848 


027300 








027300 


104460 




5849 


027302 








027302 


104410 






027304 


000126 




5850 








5851 


027306 


004537 


010010 


5852 


027312 


000001 




5853 


027314 


000006 




5854 


027316 


004537 


010010 


5855 


027322 


000000 




5856 


027324 


000000 




5857 








5858 


027326 


012703 


027436 


5859 


027332 


112337 


027342 


5860 








5861 


027336 


004537 


007676 


5862 


027342 


000000 




5863 


027344 


000007 




5864 


027346 


103003 




5865 


027350 








027350 


104460 




5866 


027352 







CMP *T24TBL*10. ,R3 
BNE 20$ 



{ALL CHARACTERS TRANSMITTED ? 
I IF NOT, TX ANOTHER ONE 



s x. x * a X ■* 



027236 



50$ 



5$ 



MOV 

MOVB 

BTCB 

JSR 

000 



NOCRDA 

BCC 

ERROR 

ESCAPE 



CMP 
BNE 



4T24TBL.R3 

(R3)*.5I 

0300.5$ 

R5.RXCHAR 



.♦8. 

sue 



4T24TBL+7.R3 
50$ 



{SET UP DATA TABLE POINTER 

{INSTALL NEXT EXPECTED RX CHARACTER 

{MASK OUT UNTRANSMITTED BITS 

;READ/CHECK NEXT CHARACTER 

j** HOLE FOR NEXT EXPECTED CHARACTER 

jNO INITIAL CHECK OF RDA«0 
j BR IF NO ERROR 
{REPORT STACKED ERROR 



;SKIP TO END OF TEST 



{ALL CHARACTERS CHECKED ? 
} IF NOT, CHECK ANOTHER ONE 



TRAP 

TRAP 
.WORD 



CI ERROR 

CIESCAPE 
L 10055 -. 



ENDSUB 



L 10055; 



TRAP 



CIESUB 



SUBROUTINE Q 3: 7 BIT CHARACTERS 
BGNSUB 



JSR R5.INITRN 
DDCMPJNOCHK! SYNCH 
TXOL'RXDL 





BCC 
ER.^OR 


.♦8. 




ESCAPE 


SUB 




JSR 

TSOM 

6. 

JSR 

000 




R5.TXCTRL 
R5.TXCTRL 


301: 


MOV 
MOVB 


0T24TBL.R3 
(R3)*,3I 


31: 


JSR 

000 

7. 

BCC 

ERROR 


R5.TXCHAR 




ESCAPE 


SUB 



T20.3: 

TRAP CIBSUB 
{LOAD 1 SOM. ClK TX UNTIL ACTIVE 
{SET CHAR MODE. NO ERROR CHECKING, S/AR-226 
{TXCL-RXCL-7 BITS 
j BR IF NO ERROR 
{REPORT STACKED ERROR 



{SKIP TO END OF TEST 

{LOAD 2ND SYNCH, TX 1ST SYNCH 
{CLEAR TSOM 



TRAP 

TRAP 
.WORD 



CI ERROR 

CIESCAPE 
L 10056 -. 



{SET l*> DATA TABLE POINTER 
{INSTALL NEXT TX CHARACTER 

{TRANSMIT CHARACTER ( •-> RX/FIFO ) 
,♦* HOLE FOR NEXT CHARACTER ** 



;BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 



CIERROR 



K12 
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SEQ 0153 





027352 


104410 






027354 


000056 




586 7 








5868 


027356 


022703 


027447 


5869 


027362 


001363 




5870 








5871 


027364 


012703 


027436 


5872 


027370 


112337 


027406 


5873 


027374 


112737 


000200 


5874 








5875 


027402 


004537 


010110 


5876 


027406 


000000 




5877 


027410 


000000 




5878 


027412 


100000 




5879 


027414 


103003 




5880 


027416 








027416 


104460 




5881 


027420 








027420 


104410 






027422 


000010 




5882 








5883 


027424 


022703 


027445 


5884 


027430 


001357 




5885 








5886 


027432 
027432 








027432 


104403 




5887 


027434 
027434 








027434 


104401 




5888 








5889 


027436 


111 




5890 


027437 


222 




5891 


027440 


333 




5892 


027441 


044 




5893 


027442 


155 




5894 


027443 


266 




5895 


027444 


377 




5896 


027445 


000 




5897 


027446 


000 




5898 


027447 


000 




5899 








5900 









TRAP CtESCAPE 
.WORD L10056-. 



027406 



6$: 





CMP 
BNE 


V>T24TBL*9, t R3 
30$ 


$: 


MOV 

MOVB 
BICB 


0T24TBL.R3 

(R3")*,6$ 

0200,6$ 


♦ 


JSR 

000 



NOCRDA 

BCC 

ERROR 


R5.RXCHAR 




ESCAPE 


SUB 




CMP 
BNE 


OT?4TBL*7,R3 
60$ 



ENDSUB 



ENDTST 



; ALL CHARACTERS TRANSMITTED ? 
; IF NOT, TX ANOTHER ONE 

j SET UP OATA TABLE POINTER 

; INSTALL NEXT EXPECTED RX CHARACTER 

j MASK OUT UNTRANSMITTED BITS 

; READ/CHECK NEXT CHARACTER 

;** HOLE FOR NEXT EXPECTED CHARACTER 

;N0 INITIAL CHECK OF ROA-0 
;BR IF NO ERROR 
{REPORT STACKED ERROR 



j SKIP TO END OF TEST 



;ALL CHARACTERS CHECKED ? 
j IF NOT, CHECK ANOTHER ONE 



TRAP 

TRAP 
.WORD 



CSERROR 

C*ESCAPE 
L10056-. 



L 10056: 



L10053; 



TRAP 



SESUB 



TRAP CIETST 



T24TBL? .BYTE 


111 


Dl 


.BYTE 


222 


02 


.BYTE 


333 


D3 


.BYTE 


044 


D4 


.BYTE 


155 


05 


.BYTE 


266 


D6 


.BYTE 


377 


D7 


.BYTE 


000 


FILLER 1 


.BYTE 


000 


FILLER 2 


.BYTE 


000 


FILLER 3 


.EVEN 







CNDMCAO OMVL1 l.INt UNIT DIAG1 
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5915 



MAC MO Ml POO 
= 0"> TEST 



ifH Hfl )f': SI PAGE H6 



SBTTL TEST 21 



OOP IX TABORT/C IDl.t = 0) TEST 



SEQ 0154 



5916 
5917 
5916 
5919 
5920 
5921 
5922 

5923 



5924 
5925 
5926 
5927 
5928 

5929 



5930 
5931 
5932 
5933 
5934 
5935 

5936 



5937 
5938 
5939 
5940 
5941 



027450 
027450 

027454 
027460 
027462 
027464 
027466 
027466 
027470 
027470 
027472 

027474 
027500 
027502 
027504 
027504 
027506 
027506 
027510 

027512 
027516 
027520 
027522 
027524 
027524 
027526 
027526 
027530 

027532 
027536 
027540 



004737 005420 

004537 007400 
003400 
040000 
103003 

104460 

104410 
000150 

004537 007116 

000000 

103003 

104460 

104410 
000132 

004537 007256 
000007 
000176 
103003 

104460 

104410 
000112 

004537 010010 

000000 

000000 



* 

TEST 21 - BOP TX TABOWT/CIDLE - 0) TEST 



THE USYRT IS INITIALIZED FOR "BI f -ORIENTED PROTOCOL" (BOP) WITH IDLE 
SET TO ZERO. TXE AND T50M IS ASSERTED AND TXC IS MANUALLY STEPPED WHILE 
OBSERVING TXA -- IT SHOULD BE ASSERTED WITHIN TWO C2) CLOCK CYCLES. 
NEXT, TXBE SHOULD GO HIGH} AT THIS TIME AN ALL ZEROS CHARACTER WILL BE 
LOADED INTO TXDB DRIVING TXBE LOU. THE TRANSMITTER IS CLOCKED THROUGH 
ONE CHARACTER. WHEN TXBE GOES HIGH AGAIN, TABORT IS ASSERTED CAUSING 
ABORT TO BE TRANSMITTED. ALL CHARACTERS ARE CHECKED AT TXSO. 
THIS TEST WILL GO NO FURTHER INTO THE TRANSMIT SEQUENCE SO THAT ONLY TWO 
FLAGS, ONE ZERO CHARACTER, AND ONE ABORT CHARACTER IS SENT (INTO THE BIT 
BUCKET). ERROR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN 
THE SEQUENCE. 



- -** + * + ** A****4** + * * + **** + + + *** + ***** + * + *+* + + ** + *** + ** + * + * + + * + * + + ** + + + * + + + + * + 

BGNTST 

T21: : 



JSR 


PC.INIDMV 


jINIT VIA 




JSR 


R5.INITRN 


{LOAD 1 SOM, CLK TX UNTIL ACTIVE 




NOCHK 




{BOP MODE, NO ERROR CHECK 




NORXEN 




j NO RECEIVER ENABLE, USE 8 BIT CHARS 




BCC 


. *8. 


]BR IF NO ERROR 




ERROR 




{REPORT STACKED ERROR 








TRAP 


C TERROR 


ESCAPE 


TST 


;SKIP TO END OF T1£ST 








TRAP 


C$ESCAPE 






.WORD 


L 10057 -. 


JSF: 


R5.CHKTS0 


{CHECK 1ST BIT 0^ EXPECTED "FLAG" 









; CHARACTER (SHOULD BE 0) 




BCC 


. +8. 


j BR IF NO ERROR 




ERROR 




?REPORT STACKED ERROR 








TRAP 


CSERROR 


ESCAPE 


TST 


{AND EXIT TEST 








TRAP 


CSESCAPE 






.WORD 


L 10057 -. 


JSR 


Rb, SERIAL 


{READ REMAINING 7 BITS OF "FLAG" CHARACTER 


7. 




, (OFF OF TSO BIT) 




176 




j EXPECTED BIT SEQUENCE (1111110) 




BCC 


. +8. 


{ BR IF NO ERROR 




ERROR 




{REPORT STACKED ERROR 





ESCAPE TST 



JSR 
000 




R5.TXCTRL 



{AND EXIT TEST 



{CLEAR TSOM 



TRAP 


CSERROR 


TRAP 
.WORD 


CtESCAPE 
L 10057- . 
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S£Q 01b! 



5942 
5943 
5944 
5945 
5946 
5947 
5948 
5949 
5950 

5951 



5952 
5953 
5954 
5955 
5956 
5957 
5958 
5959 
5960 
5961 

5962 



5963 
5964 
5965 
5966 
5967 
5968 

5969 



5970 



027542 
027546 
027550 

027552 
027556 
027560 
027562 
027564 
027564 
027566 
027566 
027570 

027572 
027576 
027600 

027602 
027606 
027610 
027612 
027614 
027614 
027616 
027616 
027620 

027622 
027626 
027630 
027632 
02 7634 
027634 
027636 
027636 
027640 
027642 
027642 
027642 



004537 
120402 
000000 

004537 
000010 
000176 
103003 

104460 

104410 
000052 

004537 
000004 
OOCOOO 

004537 
000010 
000000 
103003 

104460 

104410 
000022 

004537 
000007 
000177 
103003 

104460 

104410 
000002 



10-1401 



003734 



007256 



010010 



007256 



007256 



JSR 

TDSRL 

000 


R5.WRITEI 


JSR 

8. 

176 

BCC 

ERROR 


R5, SERIAL 
. *8. 


ESCAPE 


rsT 


JSR 
TAB 



R5.TXCTRL 


JSR 

8. 

000 

BCC 

ERROR 


R5, SERIAL 
. *8. 


ESCAPE 


TST 


JSR 

7 

177 

BCC 

ERROR 


R5, SERIAL 


ESCAPE 


TST 



ENQTST 



;L0AD 000 CHARACTER 



{READ FLAG CHARACTER VIA TSO 

; 8 BIT CHAR/CLOCK TICKS 

j EXPECTED BIT SEQUENCE (01111110) 

5 BR IE NO ERROR 

; REPORT STACKED ERROR 

TRAP 

;MND EXIT TEST 

TRAP 
.WORD 

{SET TXABT BIT 



{READ 000 CHARACTER VIA TSO 

j 8 BIT CHAR/CLOCK TICKS 

j EXPECTED BIT SEQUENCE (00000000) 

}BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP 

iAND EXIT TEST 

TRAP 
.WORD 

{READ ABORT CHARACTER VIA TSO 

j 7 BIT CHAR/CLOCK TICKS 

i EXPECTED BIT SEQUENCE (1111111) 

{ BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP 

j AND EXIT TEST 

TRAP 
.WORD 



C $ ERROR 

CSESCAPE 
L1O057-. 



C TERROR 

C*ESCAPE 
L10057-. 



L10057; 



TRAP 



C$ERROR 

CSESCAPE 
L10057-. 



C$ETST 



CNDMCAO OMVli LINE UNIT DIAG1 
TEST 22 -• BOP TX TABORT/(IDLE 
5985 



Nl 

PAGF. 87 






5986 
5987 
5988 
5989 
5990 
5991 
5992 

5993 



5994 
5995 
5996 
5997 
5998 

5999 



6000 
6001 
6002 
6005 
6004 
6005 

6006 



6007 
6008 
6009 
6010 
6011 



027644 
027644 

027650 
027654 
027656 
027660 
027662 
027662 
027664 
027664 
027666 

027670 
027674 
027676 
027700 
027700 
027702 
027702 
027704 

027706 
027712 
027714 
027716 
027720 
027720 
027722 
027722 
027724 

027 726 
027732 
027734 



004737 

004537 
007400 
040000 
103003 

104460 

104410 
000150 

004537 
000000 
103003 

104460 

104410 
000132 

004537 
000007 

000176 
103003 

104460 

104410 
000112 

004537 
OOOOOO 
000000 



MACKU M1200 22 -FEB -84 15:31 
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.SBTTL TEST 22 -- BOP TX TABORT/CIDLE * 1) TEST 

. h*****+M A********.***.****^*********.****.********************^***.***^****^***.* 
■ * 

TEST 22 --- BOP TX TA80RT/CIDLE - 1) TEST 



005420 
007400 



007116 



007256 



010010 



5 + 
• * 

{ + 
J + 

}* 

; + 

* 

+ 

* 
* 

* 
* 



THE USYRT IS INITIALIZED KOR "BIT -ORIENTED PROTOCOL" (BOP) UITH IDLE 
SET TO ONE. TXE AND TSOM IS ASSERTED AND TXC IS MANUALLY STEPPED WHILE 
OBSERVING TXA -- IT SHOULD BE ASSERTED WITHIN TWO (2) CLOCK CYCLES. 
NEXT, TXBE SHOULD GO HIGH; AT THIS TIME AN ALL ZEROS CHARACTER WILL BE 
LOADED INTO TXDB DRIVING TXBE LOW. THE TRANSMITTER IS CLOCKED THROUGH 
ONE CHARACTER. WHEN TXBE GOES HIGH AGAIN, TABORT IS ASSERTED CAUSING 
ABORT TO BE TRANSMITTED. ALL CHARACTERS ARE CHECKED AT TXSO. 
THIS TEST WILL GO NO FURTHER INTO THE TRANSMIT SEQUENCE SO THAT ONLY TWO 
FLAGS, ONE ZERO CHARACTER, AND ONE FLAG CHARACTER IS SENT CINTO THE BIT 
BUCKET). ERROR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN 
THE SEQUENCE. 



************************************************************************* A* 

BGNTST 

fINIT VIA 



JSR 


PC.INIDMV 


JSR 


R5.INITRN 


NOCHK'I 


DLES 


NORXEN 




BCC 


.+8* 


ERROR 





ESCAPE TST 



JSR 


R5.CHKTS0 







BCC 


.♦B. 


ERROR 





ESCAPE TST 



JSR 
7. 
176 
BCC 

ERROR 


R5, SERIAL 
.♦8. 


ESCAPE 


TST 


JSR 
000 



R5,TXCTRL 



T22i : 



{LOAD 1 SOM, CLK TX UNTIL ACTIVE 

iBOP MODE, NO ERROR CHECK, IDLE-1 

{NO RECEIVER ENABLE, USE 8 BIT CHARS 

;BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP CSERROR 

{SKIP TO END OF TEST 

TRAP C$ESCAPE 
.WORD L 10060 -. 

{CHECK 1ST BIT OF EXPECTED "FLAG" 

; CHARACTER (SHOULD BE 0) 

; BR IF NO ERROR 

i REPORT STACKED ERROR 

TRAP CJERROR 

{AND EXIT TEST 

TRAP CiESCAPE 
.WORD L 10060- . 

{READ REMAINING / BITS OF "FLAG" CHARACTER 

j (OFF OF TSO BIT) 

5 EXPECTED BIT SEQUENCE (1111110) 

{BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP CSERROR 

{AND EXIT TEST 

TRAP CSESCAPE 
.WORD L i 0060-. 

{CLEAR TSOM 



5EQ 0156 



CNOMCAO DMVtl LINE UNIT DTAG1 
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SF.Q 01 e >/ 



6012 
6015 
6014 
6015 
6016 
601? 
6018 
6019 
6020 

6021 



6022 
6025 
6024 
6025 
6026 
602 7 
6028 
6029 
6050 
6051 

6052 



6055 
6054 
6055 
6056 
6057 
60 58 

6059 



6040 



027756 
02 7 742 

027744 

02 7 746 
027752 
027754 
02 7 756 
02 7 760 
027760 
027762 
02 7 762 
OP 7 764 

027766 
027772 
027774 

027776 
050002 
050004 
750006 
050010 
050010 
030012 
050012 
050014 

030016 
050022 
050024 
030026 
0300 30 
030050 
050052 
050052 
030034 
050036 
030056 
050036 



00455/ 005734 

12O402 

000000 

0O453 7 007256 
OOOOIO 
0OO1 76 
103005 

104460 

104410 
0OO052 

004557 010010 

00O004 

OOGOOO 



004557 
OOOOIO 
000000 

105005 

104460 

104410 
0OOO22 

004557 
OOOOIO 
000176 
103003 

104460 

104413 
000002 



104401 



007256 



007256 



JbH 
TDSRL 

000 


R r >,wRITf I 


JSR 
8. 
i 76 
BCC 
ERROR 


RS, SERIAL 

. »8, 


ESCAPE 


tst 


JSR 
TAB 



R5.TXCTRI 


JSR 

8. 

000 

BCC 

ERROR 


R5, SERIAL 


ESCAPE 


TST 


JSR 

8. 

176 

BCC 

ERROR 


R5. SERIAL 

. »8. 


ESCAPt 


15,1 



tNUTSI 



j LOAD 000 CHARACTER 



jREAD Ft AC CHARACTER VIA TsO 

I 8 BIT CHAR/CLOCK TICKS 

I EXPFCTFD BIT SEQUENCE (01111110) 

i BR IF NO ERROR 

jREPORT STACKEO ERROR 

TRAP 

jANO EXIT TEST 

TRAP 
.WORD 

iSET TXABT BIT 



jREAO 000 CHARACTER VIA TSO 

l 8 BIT CMAR/Ct. OCX TICKS 

i EXPECTED BIT SEQUENCE ( OOOOOOOO ; 

1 BR IF NO ERROR 

I REPORT STACKED ERROR 

TRAP 

iANO EXIT TEST 

TRAP 
.WORD 

"jREAD ABORT (FLAG) CHARACTER VIA TSO 

I 8 BIT CHAR/CLOCK TICK$. 

j EXPECTED BIT SEQUENCE. "( 01 1111 10) 

iBR IF NO ERROR 

jREPORT STACKED ERfiQR 

TRAP 
*AND-EW-4&&I 

TRAP 
.WORD 



tRAP 



Cif RMOR 

Clt sCAPf 
L10060-. 



CI ERROR 

C IE SCAPE 
L10060-. 



CIERROR 

C IE SCAPE 
L1OO60- . 



CM. 1ST 



CNOHfAO OH\\\ 1. 
Ttbl 23 BOP 
605b 



L 1 V 
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TX TXGA MRANSMll GO AHtAD) TEM 

.SBTTl. rt-.ST 23 BOP TX TXGA (TRANSMIT GO AHEAD) TEST 



r .E r J 01S« 



6056 
605 7 
605C 
6059 
6O60 
6061 
6062 

6063 



6064 
t>065 
6066 
6067 
6068 

6069 



6070 
60/1 
60/2 
6073 
60 74 
6075 

6076 



60// 
6078 

60/9 
6080 
6QS1 



030O40 
030040 

030044 
030050 
030052 
0300S4 
030056 
030056 
030060 
030060 
030062 

030064 
050070 
030072 
050074 
030074 
030076 
030076 
030100 

030102 
030106 
030110 
030112 
030114 
030114 
030116 
030116 
030120 

030122 
050126 
030130 



004/37 

0O4537 
003400 
040O00 
103003 

104460 

104410 
000150 

0O4537 
OoOOOO 
105003 

104460 

104410 
000152 

004537 
00000/ 

0O0176 
103003 

104460 

104410 
000112 

00453/ 
000000 
000000 



005420 
007400 



007116 



007256 



010010 



TEST 23 



BOP TX TXGA (TRANSMIT GO AHEAD) TFSf 



the usyrt is initialized km bop ano txf is asserted. tsom is asserted 
ano txa observed - • it should be asserted within two (2) clock cycles. 
next, txbe sh0u_d g'l highj at this time an all. zeros character will he 
loaded into txd8 driving txbe low. when txbe goes high again. txga 
is asserted causing ga to be transmitted. the sequence of events is 
continually monitored while txc is manually controlled ano all 
characters are checked at txso. this test will go no further into 
the transmit sequence so that only two flags, one zero character 
and one ga character is sent (into the bit bucket), 
error looping will depend on where the first error occurs within 
the: sequence. 



BGNTST 

lINIT VIA 



JSR 

JSR 

NOCHK 

NCRXEN 

BCC 

ERROR 

ESCAPE 



JSR 


BCC 
ERROR 



PC.INIDMV 
Rb.IMiTRN 

,♦8. 

TST 

R5.CHKTS0 



ESCAPE TST 



J r R 

7. 
1 7b 
BCC 
ERROR 


R5, SERIAL 
.♦8. 


F SCAPE 


TST 


JSR 
OOO 



H5.1XCTRL 



T23:: 



jLOAD 1 SOM, CLK TX UNTIL ACTIVE 

i BOP MOOE. NO ERROR CHICK 

j NO RECEIVER ENABLE. USE 8 UIT CHARS 

iBR IE NO ERROR 

i REPORT STACKED ERROR 

TRAP 

I SKIP TO END OF TEST 

TRAP 
.WORD 

iCHECK 1ST BIT Of EXPECTED "FLAG" 

, CHARACTER (SHOUD BE. 0) 

iBR IF NO ERROR 

I REPORT STACKED ERROR 



CIERROR 

CtESCAPE 
L10061 . 



TRAP 


Cf ERROR 


;AN0 EXIT TEST 




TRAP 


C IE SCAPE 


.WORD 


I 10061-. 


,READ REMAINING 7 BITS 0* 'HAG" CHARACTER 


, (OFF OF TSO BIT) 




j EXPECTED BIT SEQUENCE. UlliUQ) 




iBR IF NO ERROR 




j REPORT STACKED ERROR 




TRAP 


C1ERR0R 


jAND EXIT TEST 




TRAP 


Cli-SCAPt 


♦ WORD 


L 10061*. 



i CLEAR TSOM 
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«jRJ 0159 



6082 
608? 
6084 
6085 
6086 
6087 
6088 
6089 
6090 

6091 



6092 
6093 
6094 
6095 
6096 
6097 
6098 
6099 
6100 
6101 

6102 



6103 
6104 
6105 
6106 
6107 
6108 

6109 



6110 



030132 
030136 
030140 

030142 
030146 
030150 
030152 
030154 
030154 
030156 
030156 
030160 

030162 
030166 
030170 

030172 
030176 
030200 
030202 
030204 
030204 
030206 
030206 
030210 

030212 
030216 
030220 
030222 
030224 
030224 
030226 
030226 
030230 
030232 
030232 
030232 



00453/ 
120402 
000000 

004537 
OOOOIO 
000176 

103003 

104460 

104410 
000052 

004537 
00O012 
OOCOOO 

004537 
OOOOIO 
000000 
103003 

104460 

104410 
000022 

004537 
OOOOIO 
000177 
103003 

1C4460 

104410 
0OOO02 



104401 



003734 



007256 



010010 



007256 



007256 



ENOTST 



JSR 


R5.WRITFT 


j LOAD 000 CHARACTER 






TDSRL 










000 










JSR 


R5 f SERIAL 


jREAD "flAG" CHARACTER VIA T< 


>0 




8. 




: 8 BIT CHAR/CLOCK TICKS 






176 




j EXPECTED BIT SEQltNCE (01111110) 




BCC 


. ►B. 


} UR IF NO ERROR 






ERROR 




j REPORT STACKED ERROR 


TRAP 


C 9 ERROR 


ESCAPE 


rsT 


jANO EXIT TEST 


TRAP 
.WORD 


CH SCAPE 
L10061-. 


JSR 


R5,TXCTRl 


tSET TX GO-AHEAD AND TEOM 






TGA.'TEOM 









JSR 


R5, SERIAL 


;READ 000 CHARACTER VIA TSO 






8. 




i 8 BIT CHAR/CLOCK TICKS 






000 




I EXPECTED BIT SEQUENCE COOOOOOOO) 




BCC 


,♦8. 


j BR IF NO ERROR 






ERROR 




jREPORT STACKED ERROR 


TRAP 


C IERROR 


ESCAPE 


TST 


iANO EXIT TEST 


TRAP 
.WORD 


CiESCAPE 
L10061-. 


JSR 


R5, SERIAL 


jREAD GO-AHEAD CHARACTER VIA 


TSO 


..._.. 


8. 




t 8 BIT CHAR/CLOCK TICKS 






177 




i EXPECTED BIT SEQUE^E (01111111) 





BCC 


.♦8. 


, BR IF NO ERROR 






ERROR 




jREPORT STACKED ERROR 


TRAP 


Ct ERROR 


ESCAPE 


1ST 


. lAN£ EXIT TEST 


TRAP 
.WORD 


CIESCAPE 

L10061-. 



L 10064 



TRAP 



CtETST 
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SEQ 0160 



.SBTTL TEST 24 



BOP TX MESSAGE WITHOUT CRC 



6123 
6124 
6125 
6126 
6127 
6128 
6129 

6130 



6131 
6132 
6133 
6134 
6135 
6136 
6137 
6138 
6139 
6140 
6141 
6142 
6143 
6144 

6145 



6146 
6147 
6148 
6149 

6 ISO 
6151 

6152 



030234 
030234 

030240 
030244 
030?46 
030250 
030252 
030252 
030254 
030254 
030256 

030260 
030264 
03026/. 

030270 
030274 
030276 

030300 
030304 
030306 
030310 
030312 
030312 
030314 
030314 
030316 

030320 
030324 
030326 
030330 
030332 
030332 
030334 
030334 



004737 

004537 
003400 
000000 
103003 

104460 

104410 
000332 

004537 
000001 
000007 

004537 
OOOOOO 
OOOOOO 

004537 
OOOOOO 
000010 
103003 

104460 

104410 
000272 

004537 
000 307 
000010 
103003 

104460 

104410 



005420 
007400 



010010 



010010 



007676 



007676 



TEST 24 -- BOP TX MESSAGE WITHOUT CRC 

THE USYRT IS INITIALIZED TOR BOP MODE WITH NO ERROR DETECTION. TXC IS THEN 
MANUALLY CONTROLLED UNTIL TWO FLAG CHARACTERS HAVE BEEN TRANSMITTED. THEN 
A 5 CHARACTER MESSAGE IS TRANSMITTED, RECEIVED, CHECKED, AND TERMINATED 
(WITH TEOM). A CHECK IS MADE TO ASCERTAIN THAT NO CRC OR VRC IS GENERATED 
-- FLAG CHARACTERS SHOULD FOLLOW THE DATA. 

(NOTE: NO BIT STUFFING OCCURS IN THIS TEST) 

TEST MESSAGE: FLAG FLAG 000 307 125 252 201 FLAG 

-4+ ********* + + **,* + + * + + +.* + +. + + + + + + * + + * + + ****** + ** m + m^mmmm^^mm* 

BGNTST 

T24:: 

jINIT DMV-11, ENTER M-LOOP 

jLOAD 1 SOfl. CLK TX UNTIL ACTIVE 
;SET BOP MODE, NO CHECK 
{USE 8 BIT CHARS 
» BR IF NO ERROR 
{REPORT STACKED ERROR 



JSR 


PC.INIDMV 


JSR 

NOCHK 



BCC 

ERROR 


R5.INITRN 
,♦8. 


ESCAPE 


TST 


JSR 
TSOM 

7. 


R5.TXCTRL 


JSR 
000 



R5.TXCTRL 


JSR 
000 
8. 

BCC 
ERROR 


R5.TXCHAR 
. *8. 


ESCAPE 


TST 


JSR 

307 

8. 

BCC 

ERROR 


R5.TXCHAR 

. ►a. 


ESCAPE 


TST 



j SKIP TO END OF TEST 



lLOAD 2ND FLAG, TX 1ST FLAG 



{CLEAR TSOM 



{LOAD 000, TX 2ND FLAG 



i BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



jLOAD 307, TX 000 



I BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO ENP OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
. WORD 



CiERROR 

CIESCAPE 
L 10062 . 



CiERROR 

CIESCAPE 
L 10062. 



TRAP 
TRAP 



CIERROR 
CIESCAPE 



I i ) 
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SEQ 0161 





030336 


000252 


6153 






6154 


030340 


004537 


6155 


030344 


000125 


6156 


030346 


000010 


6157 


030350 


103003 


6158 


030352 






030352 


104460 


6159 


030354 






030354 


104410 




030356 


000232 


6160 






6161 


030360 


004537 


6162 


030364 


000252 


6163 


030366 


000000 


6164 


030370 


103003 


6165 


030372 






030372 


104460 


6166 


030374 






030374 


104410 




030376 


000212 


6167 






6168 


030400 


004537 


616<* 


030404 


000000 


6170 


030406 


103003 


6171 


030410 






030410 


104460 


6172 


030412 






030412 


104410 




030414 


000174 


6173 






6174 


030416 


004537 


6175 


030422 


000400 


6176 


030424 


000000 


6177 


030426 


000010 


6178 


030430 


103003 


6179 


030432 






030432 


104460 


6180 


030434 






030434 


104410 




030436 


000152 


6181 






6182 


030440 


004537 


6183 


030444 


000201 


6184 


030446 


000000 


6185 


03O450 


103003 


6186 


030452 






030452 


104460 


6187 


030454 






030454 


104410 




030456 


000132 


6188 






6189 


030460 


004537 


6190 


030464 


000307 


6191 


030466 


000000 


6192 


030470 


000010 


6193 


030472 


103003 



WORD 



L 10062 •, 



007676 



007676 



011364 



010110 



007676 



010110 



JSR 

125 

8, 

BCC 

ERROR 


R5.TXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 

252 



BCC 

ERROR 


R5.TXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 


BCC 
ERROR 


R5.RCV1ST 
.♦8. 


ESCAPE 


TST 


JSR R5.RXCHAR 

RXSOMJOOO 



8. 

8CC .*8. 

ERROR 


ESCAPE 


TST 


JSR 

201 



BCC 

ERROR 


R5.TXCHAR 
.♦8, 


ESCAPE 


TST 


JSR 

307 



8. 

BCC 


R5.RXCHAR 
.♦8* 



{LOAD 125$ TX 507 



}BR IF NO ERROR 
fREPORT STACKED ERROR 

j SKIP TO END OF TEST 



{LOAD 252 



jBR IF NO ERROR 
jREPORT STACKED ERROR 

{SKIP TO END OF TEST 



{CLOCK AND RCV 000 

{BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO ENO OF TEST 



{READ C CHK 000. RCV 307 
{ £ CHECK RSOM-1 



jBR IF NO ERROR 

, REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{LOAD 201 



» BR IF NO ERROR 
{REPORT STACKED ERROR 

»SKIP TO END OF TEST 



jREAD S CHK 307, RCV 125 



iBR IF NO ERROR 



TRAP 

TRAP 

.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



CJERROR 

CiFSCAPE 
L 10062 -. 



CJERROR 

CiESCAPE 
L 10062 -. 



CSERROR 

CJESCAPE 
L 10062 -. 



C *FRROR 

CIESCAPE 
L 10062 -. 



C1ERR0R 

CJESCAPE 
L10O62-. 
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6194 


0304 74 






0304 74 


104460 


6195 


0304 76 






030476 


104410 




030500 


000110 


6196 






6197 


030502 


004537 010010 


6198 


030506 


000002 


6199 


030510 


OOOOOO 


6200 


030512 


103003 


6201 


030514 






030514 


104460 


6202 


030516 






030516 


104410 




030520 


000070 


6203 






6204 


030522 


004537 010110 


6205 


030526 


000125 


6206 


050530 


OOOOOO 


6207 


030532 


000010 


6208 


030534 


103003 


6209 


030536 






030536 


104460 


6210 


030540 






030540 


104410 




030542 


000046 


6211 






6212 


030544 


004537 010110 


6213 


030550 


000252 


6214 


030552 


OOOOOO 


6215 


030554 


0200)0 


6216 


030556 


10300 5 


6217 


030560 






030560 


104460 


6218 


030562 






050562 


104410 




030564 


000024 


6219 






6220 


030566 


004537 010110 


6221 


050572 


001201 


6222 


050574 


OOOOOO 


6223 


050576 


060000 


6224 


050600 


105005 


6225 


050602 






050602 


104460 


6226 


050604 






050604 


104410 




050606 


000002 


6227 


050610 
030610 
030610 


104401 



ENDTST 



ERROR 




{REPORT STACKED ERROR 


TRAP 


CIERROR 


ESCAPE 


TST 


{SKIP TO END OF* TEST 


TRAP 
.WORD 


CiESCAPE 
L 10062- . 


JSR 


R5.TXCTRI 


{SET TEOM BIT 






TEOM 











BCC 


.♦8. 


; BR IE NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


CiERROR 


ESCAPE 


TST 


{SKIP TO END OP" TEST 


TRAP 
.WORD 


C1ESCAPE 
L 10062 -. 


JSR 


R5.RXCMAR 


{READ 6 CHK 125, RCV 252 






125 












8. 










BCC 


.♦8. 


jBR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


CSERROR 


ESCAPE 


TST 


{SKIP TO END OF TEST 


TRAP 
.WORD 


CIESCAPF 
L 10062 -. 


JSR 


R5.RXCHAR 


{READ 6 CHK 252, RCV 201 






252 











NCRACT! 


!8. 


jOON'T CHECK FOR FINAL RXACT-1 






BCC 


.♦8. 


iBR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


CIERROR 


ESCAPE 


TST 


j SKIP TO END OF TEST 


TRAP 

.WORD 


CIESCAPE 

L 10062 -. 


JSR 


R5.RXCHAR 


{READ 6 CHK 201, RCV FIRST FLAG 






RXEOMJ* 



NFCR0A1 


>01 


{ 6 CHECK REOtt 






t NCRACT 


jDON'T CHECK FOR FINAL RDA-RXACT-1 




BCC 


.♦8. 


jBR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


CtERROR 


ESCAPE 


TST 


{SKIP TO ENO OF TEST 


TRAP 
.WORD 


CiESCAPE 
L 10062 -. 



SEQ 0162 



L 10062; 



TRAP 



C5ETST 



CNDMCAO 

TEST 25 

6249 



OMVll I 
BOP 



6250 
6251 
6252 
6253 
6254 



6255 
6256 
6257 
6258 
6259 

6260 



6261 
6262 
6263 
6264 
6265 
6266 
6267 
6268 
6269 
6270 
6271 
6272 



030612 
030612 



030616 
030616 
030616 
030620 
030624 
030626 
030630 
030632 
030632 
030634 
030634 
030636 

030640 
030644 
030646 
030650 
030654 
030656 
030660 
030664 
030666 
030670 
030672 
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.SBTTL TEST 25 BOP RX CHARACTER LENGTH TEST 

TEST 25 -- BOP RX CHARACTER LENGTH TEST 

THE USYRT IS INITIALIZED FOR BOP WITH CRC -CCITT PRESET TO l'S. TXC 
IS MANUALLY CONTROLLED UNTIL TWO FLAG CHARACTERS HAVE BEEN 
TRANSMITTED. THEN 6 SUBTESTS FOLLOW, EACH ONE USING A DIFFERENT 
TRANSMIT CHARACTER LENGTH STARTING AT TWO (2; AND ENDING WITH SEVEN 
(7). IN EACH SUBTEST, TWO 8 BIT CHARACTERS WILL BE TRANSMITTED 
BEFORE TXCL IS CHANCED TO THE CHARACTER LENGTH BEING TESTED, THIS 
CORRESPONDS TO NORMAL USAGE WHERE EITHER: 

1 -- A MESSAGE OF CHARACTERS WHICH ARE LESS THEN 8 BITS IS 
SENT AS A STREAM OF 8 BIT CHARACTERS ANO THE REMAINING 
BITS ARE SENT AS A CHARACTER OF LESS THEN 8 BITS OR 

2 -- A HEADER OF TWO 8 BIT CHARACTERS IS SENT FOLLOWED BY A 
DATA STREAM OF DATA CHARACTERS WHICH MAY BE LESS THEN 8 
BITS IN LENGTH (I.E. 2. 3, 4, 5, 6, OR 7 BIT 
CHARACTERS), 

THE TEST PATTERN IS: 123 321 111 222 333 044 155 266 377 

BGNTST 

T25: : 
JSR PC.INIDMV iINIT DMV-L1, ENTER M-LOOP 

SUBROUTINE $ 1: 2 BIT CHARACTERS 

BGNSUB 



SEQ 0165 



004737 005420 



104402 

004537 007400 

004226 

000002 

103003 

104460 

104410 
000344 

004537 010010 

000001 

000007 

004537 010010 

000000 

000000 

004537 007676 

000123 

000010 

103003 



JSR 


R5.INITRN 


IDLES! 


SYNCH 


BIT1 




BCC 


.♦8, 


ERROR 





T25.1: 

TRAP 
jLOAD 1 SOM, CLK TX UNTIL ACTIVE 
jSET BOP M00E,CRC-CCITT-1,S/AR.226 
{INITIALLY: TXCL-8 BITS / RXCL*2 BITS 
i BR IF NO ERROR 
jREPORT STACKED ERROR 



$BSL« 



ESCAPE SUB 



JSR 


R5.TXCTRL 


TSOM 




7, 




JSR 


R5.TXCTRL 


000 









JSR 


R5.TXCHAR 


123 




8. 




BCC 


.♦8, 


ERROR 





;SKIP TO END OF TEST 

}LOAO 2ND FLAG.TX 1ST FLAG 

j CLEAR TSOM 

j LOAD 123CHEADER1), TX 2ND FLAG 



,BR IF NO ERROR 
{REPORT STACKED ERROR 



TRAP 

TRAP 
.WORD 



CiERROR 

C*ESCAPE 
L 10064 ~. 
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SEG1 0164 





030672 


104460 








TRAP 


C5ERR0P 


6273 


030674 






ESCAPE 


SUB 


iSKIP TO END OF TEST 






030674 


104410 








TRAP 


C*F r CMPE 




030676 


000304 








.WORD 


L10064-. 


6274 
















6275 


030700 


004537 


007676 


JSR 


R5.TXCHAR 


jLOAD 32KHEADER2), TX 123CHEADER1) 




6276 


030704 


000321 




321 








6277 


030706 


000010 




8. 








6278 


030710 


103003 




BCC 


.♦8. 


;BR IF NO ERROR 




6279 


030712 






ERROR 




s REPORT STACKED ERROR 






030712 


104460 








TRAP 


C*ERROR 


6280 


030714 






ESCAPE 


SUB 


j SKIP TO END OF TEST 






030714 


104410 








TRAP 


CiESCAPE 




030716 


000264 








♦ WORD 


L10064-. 


6281 
















6282 


030720 


004537 


003734 


J3R 


R5.WRITEI 


jNOW CHANGE TXCL TO 2 BITS TOO 




6283 


030724 


12C407 




PCR 








6284 


030726 


000102 




BIT6JBIT1 






6285 


030730 


004537 


007676 


JSR 


R5.TXCHAR 


;LOAO 11KDATA1), TX 321CHEADER2) 




6286 


030734 


000111 




111 








6287 


030736 


000010 




8. 








6288 


030740 


103003 




BCC 


.♦8. 


5 BR IF NO ERROR 




6289 


030742 






ERROR 




jREPORT STACKED ERROR 






030742 


104460 








TRAP 


C TERROR 


6290 


030744 






ESCAPE 


SUB 


{SKIP TO END OF TEST 






030744 


104410 








TRAP 


C1ESCAPE 




030746 


000234 








.WORD 


L 10064 -. 


6291 
6292 
















030750 


012703 


033525 


MOV 


*T30TBL*1.R3 


j SET UP DATA TABLE POINTER 




6293 


030754 


112337 


030764 


10$: MOVB 


(R3)»,l* 


X INSTALL NEXT TX CHARACTER 




6294 
















6295 


030760 


004537 


007676 


JSR 


R5.TXCHAR 


{TRANSMIT CHARACTER ( --> RX/FIFO ) 




6296 


030764 


000000 




1$: 000 




!♦♦ HOLE FOR NEXT CHARACTER ♦* 




6297 


030766 


000002 




2. 








6298 


030770 


103003 




BCC 


.♦8. 


iBR IF NO ERROR 




6299 


030772 






ERROR 




j REPORT STACKED ERROR 






030772 


104460 








TRAP 


CIERROR 


6300 


030774 






ESCAPE 


SUB 


j SKIP TO END OF TEST 






030774 


104410 








TRAP 


CSESCAPE 




030776 


000204 








.WORD 


L10064-. 


6301 
















6302 


031000 


022703 


033533 


CMP 


*T30TBL»7,R3 


iALL CHARACTERS TRANSMITTED ? 




6303 


031004 


001363 




BNE 


10$ 


j IF NOT, TX ANOTHER ONE 




6304 
















6305 


031006 


004537 


010010 


JSR 


R5.TXCTRL 


;SET TEOM 




6306 


0310lx> 


000002 




TEOM 








6307 


031014 


000000 













6308 


031016 


004537 


011614 


JSR 


R5.STEPLU 


j AND TX DATA7 ♦ SOME FLAGS 




6309 


031022 


000044 




36. 








6310 
















6311 


031024 


004537 


010110 


JSR 


R5.RXCHAR 


jREAD C CHK 123CHEA0ER1), RCV 321CHEADER2^ 


6312 


031030 


000523 




RXS0MJ123 


{ £ CHECK FOR RSOM-l 




6313 


031032 


000000 













6314 


031034 


100000 




NOCRDA 




jNO INITIAL CHECK OF RDA-0 




6315 


031036 


103003 




BCC 


.♦8. 


}BR IF NO ERROR 




6316 


031040 
031040 


104460 




ERROR 




; REPORT STACKED ERROR 

TRAP 


C TERROR 
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6317 



6318 
6319 
6320 
6321 
6322 
6323 
6324 

6325 



6326 
6327 
6328 
6329 
6330 
6331 
6332 
6333 
6334 
6335 
6336 

6337 



6338 
6339 
6340 
6341 
6342 
6343 
6344 
6345 
6346 
6347 

6348 



6349 
6350 
6351 
6352 
6353 
6354 
6355 

6356 



6357 



031042 
031042 
031044 

031046 
031052 
031054 
031056 
031060 
031062 
031062 
031064 
031064 
031066 

031070 
031074 
031100 

031106 
031112 
031114 
031116 
031120 
031122 
031122 
031124 
031124 
031126 

031130 
031134 

031136 
031142 
031144 
031146 
031150 
031152 
031152 
031154 
031154 
031156 

031160 
031164 
031166 
031170 
031172 
031174 
031174 
031176 
031176 
031200 
031202 
031202 
031202 



104410 
000136 

004537 
000321 
000000 
100000 
103003 

104460 

104410 
000114 

012703 
112337 
142737 

0O4537 

ocoooo 

000000 
100000 
103003 

1 ^460 

104*; io 
000054 

022703 
001357 

004537 
000002 
000000 
120000 
103003 

104460 

104410 
000024 

004537 
001003 
000001 
160000 
103003 

104460 

104410 
000002 



104403 



010110 



033524 

031112 
000374 

010110 



031112 



20$: 



2$: 



033531 
010110 



010110 
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ESCAPE 


SUB 


JSR 

321 



NOCRDA 

BCC 

ERROR 


R5.RXCHAR 
.+8. 


ESCAPF 


SUB 


MOV 

MOVB 

BICB 


OT50TBL.R3 

CR3)*,2$ 

0374,2$ 


JSP 

000 



NOCRDA 

BCC 

ERROR 


R5,RXCHAR 


tJL^E 


sue 



jSKIP TO END Or TEST 



TRAP 
.WORD 



{READ/CHECK 32KHEADER2 ) ,RCV 00KDATA1) 



jNO INITIAL CHECK OF RDA*0 

; BR IF NO ERROR 

j REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



jSET UP DATA TABLE POINTER 

5 INSTALL NEXT EXPECTED RX CHARACTER 

jMASK OUT UNTRANSMITTED BITS 

jREAD/CHECK NEXT CHARACTER 

;♦♦ HOLE FOR NEXT EXPECTED CHARACTER 

;N0 INITIAL CHECK OF RDA-0 

iBR IF NO ERROR 

j REPORT STACKED ERROR 



CMP *T30TBL*5,R3 
BNE 20$ 



;SKIP TO END OF TEST 



j ALL CHARACTERS CHECKED ? 
j IF NOT, CHECK ANOTHER ONE 



TRAP 

TRAP 
.WORD 



R5.RXCHAR 



JSR 

002 



NCRACT J NOCRDA 

bCC .-8. 

ERROR 

ESCAPE SUB 



JSR R5.RXCHAR 

RXE0MJ003 

RERCHK 

NOCRDA !NFCRDA!NCRACT 

BCC .♦8. 

ERROR 



jREAD/CHK DATA6C002:), RCV DATA7 

jNO INITIAL CHECK OF RDA-0 
jOON'T CHECK FOR FINAL RXACT-1 
;BR IF NO ERROR 
j REPORT STACKED ERROR 

j SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



ESCAPE SUB 



ENDSUB 



jREAD/CHK DATA7C003), RCV FIRST FLAG 

:6 CHECK RERR BIT-0 (GOOD CRC) 6 REOM-1 

jNO INITIAL CHECK OF RDA-0 

jDON'T CHECK FOR FINAL RDA-RXACT-1 

}BR IF NO ERROR 

jREPORT STACKED ERROR 

TRAP 

l SKIP TO END OF TEST 

TRAP 
.WORD 



CiESCAPE 
L 10064 -. 



C $ ERROR 

CiESCAPE 
L10064-. 



CiERROR 

CiESCAPE 
L10064-. 



CiERROR 

CIESCAPE 
I 10064- . 



L 10064: 



TRAP 



CiERROR 

CiESCAPE 
L 10064 . 



CIESLB 



SEQ 0165 



CNDMCAO 


DMV11 LINE UNIT 


0IAG1 


TEST 25 


-• BOP 


RX CHARACTER LEr 


6358 








6359 








6360 








6361 


031204 
031204 








031204 


10440^ 




6362 


031206 


004537 


007400 


6363 


031212 


000226 




6364 


031214 


000003 




6365 


031216 


103003 




6366 


031220 








031220 


104460 




6367 


031222 








031222 


104410 






031224 


000344 




6368 








6369 


031226 


004537 


010010 


6370 


031232 


000001 




6371 


031234 


000007 




6372 


031236 


004537 


010010 


6373 


031242 


000000 




6374 


031244 


000000 




6375 


031246 


004537 


007676 


6376 


031252 


000123 




6377 


031254 


000010 




6378 


031256 


103003 




6379 


031260 








031260 


104460 




6380 


031262 








031262 


104410 






031264 


000304 




6381 








6382 


031266 


004537 


007676 


6383 


031272 


000321 




6384 


031274 


000010 




6385 


031276 


103003 




6386 


031300 








031300 


104460 




6387 


031302 








031302 


104410 






031304 


000264 




6388 








6389 


031306 


004537 


003734 


6390 


031312 


120407 




6391 


031314 


000143 




6392 


031316 


004537 


007676 


6393 


031322 


000111 




6394 


031324 


0000 10 




6395 


031326 


103003 




6396 


031330 








031330 


104460 




6397 


031332 








031332 


104410 






03l33'i 


000234 




6398 








6399 


031336 


012703 


033525 


6400 


031342 


112337 


031352 



Ki: r ; 
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SUBROUTINE # 2: 3 BIT CHARACTERS 
BGNSUB 



JSR 


R5.INITRN 


SYNCH 




BIU.'BITO 


BCC 


.♦8. 


ERROR 




ESCAPE 


SUB 


JSR 


R5.TXCTRL 


TSOM 




7. 




JSR 


R5.TXCTRL 


000 









JSR 


R5.TXCHAR 


123 




8. 




BCC 


.+8. 


ERROR 




ESCAPE 


SUB 


JSR 


R5.TXCHAR 


321 




8. 




BCC 


.♦8. 


ERROR 




ESCAPE 


SUB 


JSR 


R5.WRITEI 


PCR 




BIT6SBIT5!BIT1!BIT0 


JSR 


R5.TXCHAR 


111 




8. 




BCC 


.♦8. 


ERROR 





ESCAPE SUB 



T25.2: 

TRAP 
jLOAO 1 SOM, CLK IX UNTIL ACTIVE 
;SET BOP MODE.CRC-CCITT -1,S/AR«226 
{INITIALLY: TXCL-8 BITS / RXCl-3 BUS 
j BR IF NO ERROR 
; REPORT STACKED ERROR 



i SKIP TO END OF TEST 

;LOAD 2ND FLAG.TX 1ST FLAG 

{CLEAR TSOM 

;LOAD 123CHEADER1), TX 2ND FLAG 



j BR IF NO ERROR 

j REPORT STACKEO ERROR 

j SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



jLOAD 321CHEADER2), TX 123CHEADER1) 



iBR IF NO ERROR 
jREPORT STACKEO ERROR 

j SKIP TO END OF TEST 



TRAP 



TRAP 
.WORD 



{NOW CHANGE TXCL TO 3 BITS TOO 
iLOAO 11UDATA1), TX 321CHEADER2) 



;BR IF NO ERROR 
jREPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



C$BSUB 



CSERROR 

CiESCAPE 
L10065-. 



C$ERROR 

CIESCAPE 
L 10065 -. 



CSERROR 

CiESCAPE 
L 10065 -. 



CiERROR 

CJESCAPE 
L 10065 -, 



SEQ 0166 



MOV OT30TBL*l,R3 
10$: MOVB (R3)»,l* 



{SET UP DATA TABLE POINTER 
{INSTALL NEXT TX CHARACTER 
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SEQ 0167 



6401 
6402 
6403 
6404 
6405 
6406 

6407 



6408 
6409 
6410 
6411 
6412 
6413 
6414 
6415 
6416 
6417 
6418 
6419 
6420 
6421 
6422 
6423 

6424 



6425 
6426 
6427 
6428 
6429 
6430 
6431 

6432 



6433 
6434 
6435 
6436 
6437 
6433 
6439 
6440 
6441 
6442 
6443 

6444 



6445 



031346 
031352 
031354 
031356 
031360 
031360 
031362 
031362 
031364 

031366 
031372 

031374 
031400 
031402 
031404 
031410 

031412 
031416 
031420 
031422 
031424 
031426 
031426 
031430 
031430 
031432 

031434 
031440 
031442 
031444 
031446 
031450 
031450 
031452 
031452 
031454 

031456 
031462 
031466 

031474 
031500 
031502 

031504 
031506 
031510 
031510 
031512 
031512 
03:.514 



004537 007676 
000000 
000003 
103003 

104460 

104410 
000204 

022703 033533 
001363 

004537 010010 

000002 

OOCOOO 

004537 011614 

000044 

004537 010110 

000523 

000000 

100000 

103003 

104460 

104410 
000136 

004537 010110 

000321 

000000 

100000 

103003 

104460 

104410 
000114 



1$ 



I 



012703 033524 

112337 031500 40$ 

142737 000370 031500 



004537 010110 

000000 

000000 

100000 

103003 

104460 

104410 
000054 



4$ 



JSR R5.TXCHAR 

000 

3. 

BCC . *8. 

ERROR 

ESCAPE SUB 



CMP *T30TBL*7,R3 
BNE 10$ 



j TRANSMIT CHARACTER ( «=> RX/FIFQ ) 
{** HOLE FOR NEXT CHARACTER ** 



;BR IF NO ERROR 

j REPORT STACKED ERROR 

{SKIP TO END OF TEST 



5 ALL CHARACTERS TRANSMITTED ? 
; IF NOT, TX ANOTHER ONE 



TRAP 

TRAP 
.WORD 



CtfcRROR 

r*ESCAPE 
L10065-. 



a a 3 ■ a 



JSR R5.TXCTRL 

TEOM 



JSR R5.STEPLU 

36. 

JSR R5.RXCHAR 

RXS0MJ123 



NOCRDA 

BCC . *8. 

ERROR 

ESCAPE SUB 



JSR R5.RXCHAR 

321 



NOCRDA 

BCC .»8. 

ERROR 

ESCAPE SUB 



j SET TEOM 



AND TX DATA7 ♦ SOME FLAGS 



jREAD 6 CHK 123CHEADER1), RCV 32HHEADER2) 
j 6 CHECK FOR RSOM-1 

{NO INITIAL CHECK OF RDA-0 

iBR IF NO ERROR 

j REPORT STACKED ERROR 



j SKIP TO END OF TEST 



TRAP 

TRAP 

.WORD 



CSERROR 

C$ESCAPE 
L 10065 -. 



{READ/CHECK 321CHEA0ER2 ) ,RCV OOKDATAl) 



jNO INITIAL ChECK OF RDA-0 
;BR IF NO ERROR 
{REPORT STACKED ERROR 

I SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



CtERROR 

CiESCAPE 
L10065-. 



MOV 

MOVB 

BICB 

JSR 
000 


NOCRDA 

BCC 

ERROR 

ESCAPE 



OT30TBL.R3 

CR3)*,4$ 

0370,4$ 

R5.RXCHAR 



.♦8. 

sue 



{SET UP DATA TABLE POINTER 

{INSTALL NEXT EXPECTED RX CHARACTER 

{MASK OUT UNTRANSMITTED BITS 

{READ/CHECK NEXT CHARACTER 

;*+ HOLE FOR NEXT EXPECTED CHARACTER 

{NO INITIAL CHECK OF RDA-0 
iBR IF NO ERROR 
{REPORT STACKED ERROR 



{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



CJERROR 

CitSCAPE 
L 10065 -. 
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6446 
644 7 
6448 
6449 
6450 
6451 
6452 
6453 
6454 

6455 



6456 
6457 
6458 
6459 
6460 
6461 
6462 

6463 



6464 



6465 
6^.66 
6467 
6468 



6469 
64 70 
6471 
6472 
6473 

6474 



64 75 
64 76 
6477 
6478 
64 79 
6480 
6481 
6482 
6483 
6484 
6485 
64C6 

6487 



031516 
031522 

031524 
031530 
031532 
031534 
031536 
031540 
031540 
031542 
031542 
031544 

031546 
031552 
031554 
031556 
031560 
031562 
031562 
031564 
031564 
031566 
031570 
031570 
031570 



031572 
031572 
031572 
031574 
031600 
031602 
031604 
031606 
031606 
031610 
031610 
031612 

031614 
031620 
031622 
031624 
031630 
031632 
031634 
031640 
031642 
031644 
031646 
031646 
031650 
031650 



022703 033531 
001357 

004537 010110 

000006 

000000 

020000 

103003 

104460 

104410 
001756 

004537 010110 

001007 

000001 

060000 

103003 

104460 

104410 
001734 



104403 



CMP ftT30TBL*5,R3 
BNE 40$ 



;MLL CHARACTERS CHECKED ? 
; IF NOT, CHECK ANOTHER ONE 



JSR 

006 



NCRACT 

BCC 

ERROR 



R5.RXCHAR 



. *8. 



ESCAPE TST 



JSR R5,RXCHAR 

RXE0MJ007 

RERCHK 

NFCRDA'NCRACT 

BCC ,*8. 

ERROR 

ESCAPE TST 



jREAD/CHK DATA6C006), RCV 0ATA7 



{don't check for final rxact=1 
jDR if no error 
{report stacked error 

I SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



;READ/CHK DATA7CO07), RCV FIRST FLAG 

f AND CHECK FOR REOM-l 

j & CHECK RERR BIT-0 (GOOD CRC ) 

{DON'T CHECK FOR FINAL RDA-RXACT-i 

;BR IF NO ERROR 

{REPORT STACKED ERROR 



{SKIP TO END OF TEST 



ENOSUB 



L10065: 



TRAP 

TRAP 
,WORD 



TRAP 



104402 

004537 007400 

000226 

000004 

103003 

104460 

104410 
000344 

0O4537 010010 

000001 

000007 

004537 010010 

000000 

oooooo 

004537 007676 
000123 
000010 
103003 

104460 

104410 



SEQ 0168 



CSF.RROR 

C*fc. SCAPE 
L10063-. 



CJERROR 

CJESCAPE 
L10063-. 



C$ESUB 



SUBROUTINE 4 


3: 4 BIT CHAF 


iACTERS 




BGNSUB 




T25.3: 








TRAP 


C5BSUB 


JSR 


R5.INITRN 


;L0AD 1 SOM. CLK TX UNTIL ACTIVE 




SYNCH 




{SET BOP M0DE,CRC-CCITT-l,S/AR-226 




BIT2 




j INITIALLY: TXCL-8 BITS / RXCL-4 BITS 




BCC 


,♦8, 


{BR IF NO ERROR 




ERROR 




{REPORT STACKED ERROR 








TRAP 


CSERROR 


ESCAPE 


sue 


{SKIP TO END OF TEST 








TRAP 


CfESCAPE 






• WORD 


L10066-, 


JSR 


R5.TXCTRL 


{LOAD 2ND FLAG.TX 1ST FLAG 




TSOM 

7. 

JSR 








R5.TXCTRL 


{CLEAR TSOM 




000 









JSR 


R5.TXCHAR 


{LOAD 123( HEADER 1), TX 2ND FLAG 




123 
8. 








BCC 


.♦a. 


iBR If NO ERROR 




ERROR 




{REPORT STACKED ERROR 








TRAP 


CtERROR 


ESCAPE 


sue 


{SKIP TO END OF TEST 








TRAP 


C ESCAPE 
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SEQ 0169 



031652 000304 



6488 
6489 
6490 
6491 
6492 
6493 

6494 



6495 
6496 
649'' 

6498 
6499 
6500 
6501 
6502 
6505 

6504 



6505 
6506 
6507 
6508 
6509 
6510 

6511 
6512 
6513 

6514 



6515 
6516 
6517 
6518 
6519 
6520 
6521 
6522 
6523 
6524 
6525 
6526 
6527 
6528 
6529 
6530 

6531 



031654 
031660 
031662 
031664 
031666 
031666 
031670 
031670 
031672 

031674 
031700 
031702 
031704 
031710 
031712 
031714 
031716 
031716 
031720 
031720 
031722 

031724 
031730 

031734 
031740 
031742 
031744 
)J 746 
031746 
051750 
031750 
021752 

031754 
031760 

031762 

031766 
031770 
031772 
031776 

032000 
032004 

032006 
032010 
032012 
032014 
032014 
032016 
032016 
032020 



004537 
000321 
000010 
103003 

104460 

104410 
000264 

004537 
120407 
000204 
004537 
000111 
000010 
103003 

104460 

104410 
000234 

012703 
112337 

004537 
000000 
000004 
103003 

104460 

104410 
000204 

022703 
001363 

004537 
000002 
000000 
004537 
000044 

004537 
000523 
000000 
100000 
103003 

104460 

104410 
000136 



007676 



003734 
007676 



033525 
031740 

007676 



10$ 



033533 
010010 
011614 
010110 



JSR 
321 
8. 

ncc 

ERROR 


R5.TXCHAR 
, *8, 


ESCAPE 


SUB 


JSR R5.WRITEI 

PCR 

BIT71BIT2 

JSR R5.TXCHAR 

111 

8. 

bcc .*e, 

ERROR 



.WORD L 10066 -. 
{LOAD 32KHEADER2), TX 123CHEADER1 ) 



;BR IF NO ERROR 

j REPORT STACKED ERROR 

j SKIP TO END OF TEST 

I NOW CHANGE TXCL TO 4 BITS TOO 



TRAP 

TRAP 
• WORD 



C * ERROR 

C$ESCAPE 
L10066-. 



;LOAD 11KDATA1). TX 32KHEADER2) 



ESCAPE SUB 



;BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 

.WORD 



C $ ERROR 

CtESCAPE 
L 10066 -. 



MOV 
MOVB 

JSR 

000 

4, 

BCC 

ERROR 

ESCAPE 



CMP 

BNE 



0T30TBL*1,R3 

CR3)*.l* 

R5.TXCHAR 

. ♦a. 

SUB 



*T30TBl*7,R3 
10* 



{SET UP DATA TABLE POINTER 
{INSTALL NEXT TX CHARACTER 

{TRANSMIT CHARACTER ( »»> RX/FIFQ ) 
{*♦ HOLE FOR NEXT CHARACTER +* 



;BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{ALL CHARACTERS TRANSMITTED ? 
j IF NOT. TX ANOTHER ONE 



TRAP 

TRAP 
.WORD 



C*ERROR 

C$ESCAPE 
L 10066 -, 



JSR R5.TXCTRL 

TEOM 



JSR R5.STEPLU 

36. 

JSR R5.RXCHAR 

RXS0M!123 



NOCROA 

BCC . *8. 

ERROR 

ESCAPE SUB 



{SET TEOM 



; AND TX DATA7 ♦ SOME FLAGS 



;READ 6 CHK 123(HEADERl ) , RCV 321( HEADER2) 
{ £ CHECK FOR RSOM-1 

{NO INITIAL CHECK OF RDA-0 
{BR IF NO ERROR 
{REPORT STACKED ERROR 



{SKIP TO END OF VEST 



TRAP 

TRAP 

.WORD 



CSERROR 

CiESCAPE 
L 10066 -. 



CNDMCAO 


DMV11 t. 


INE INP 


DTAUl 


TEST 25 


BOP 


RX CHARACTER LEf 


6532 








65 3 5 


032022 


00453/ 


010110 


6534 


032026 


000321 




6535 


032030 


000000 




6556 


032032 


10OO00 




6^3? 


032034 


103003 




65 3d 


032036 








032036 


104460 




6559 


032040 








032040 


104410 






032042 


000114 




6540 








6541 


032044 


012703 


053524 


6542 


032050 


112337 


032066 


654 3 


032054 


142737 


000360 


6544 








6545 


032062 


0O4537 


010110 


6546 


052066 


OOOOOO 




654 7 


032070 


000000 




6548 


032072 


100000 




6549 


032074 


105003 




6550 


0320 76 








032076 


104460 




6551 


032100 








032100 


104410 






032102 


00O0S4 




655? 








6553 


032104 


022 703 


033531 


6554 


032110 


001357 




6555 








6556 


032112 


0O4537 


010110 


6557 


032116 


000006 




655« 


032120 


OOOOOO 




6559 


032122 


020000 




6560 


032124 


105005 




6561 


032126 








032126 


104460 




6562 


032130 








032130 


104410 






032132 


001370 




6563 








6564 


032154 


004537 


010110 


6565 


032140 


001017 




6566 


032142 


000001 




6567 


052144 


06O00O 




6565 


032146 


105003 




6569 


052150 








052150 


104460 




65/0 


052152 








052152 


104410 






032154 


001346 




6571 


052156 
03*2156 








052156 


IQ4AQ3 




65 7? 








6573 








6574 
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JSR R5.RXCHAR 

321 



NOCRDA 

BCC ,♦«. 

ERROR 



032066 



40»; 



41: 



iREAD/CHfcCK 321CHEADER? ) ,RCV 011CDATA1) 



ESCAPE 



|N0 iNiriAt CHECK Of RDA-0 
iBR IE NO ERROR 
iRFPORT STACKED ERROR 

iSKlP TO fcNO Of rt.SJ 



TRAP 

TRAP 
.WORD 



MOV 

MOVB 

BICB 

JSR 

000 



NOCRDA 

BCC 

ERROR 

ESCAPE 



CMP 
BNE 



♦ T30TBI ,R5 

(R3)».4$ 

0360,41 

R5,RXCHAR 



sue 



•T30TBL*5,R3 
401 



I SET UP DATA TABIF POINTER 

iINSTAIL NEXT EXPECTED RX CHARACTER 

jMASK OUT UNTRANSMITTEO BITS 

iREAD/CHECK NEXT CHARACTER 

!*♦ MOLE r 0R NEXT EXPECTED CHARACTER 

INO INITIAL CHECK 0^ RDA-0 
iBR IE NO ERROR 
(REPORT STACKED ERROR 



I SKIP TO ENO Of TEST 



I ALL CHARACTERS CHECKED ? 
i IF NOT, CHECK ANOTHER ONE 



TRAP 

TRAP 

.WORD 



R5.RXCHAP 



JSR 

006 



NCRACT 

BCC , »5, 

ERROR 

ESCAPE TST 



JSR R5.RXCHAR 

RXE0MJ017 

RERCHK 

NFCROA! NCRACT 

BCC ,♦«. 

ERROR 

ESCAPE TST 



jREAD/THK DATA6C006), RCV DATA/ 



jDON' T CHECK TOP TINAL RXACT-1 
i BR U NO ERROR 
iRFPORT STACKED ERROR 

(SKIP TO ENO OT TEST 



TRAP 

TRAP 

.WORD 



EN0SL6 



»REAO/CHK OATA7f017), RCV FIRST EL.AG 

i AND CHECK TOR REOM-1 

i £ CHtCK RERR B1T-0 fCOOO CRC ) 

lOONT CHECK r'OR FINAL ROA-RXACTM 

»BR IE NO ERROR 

I REPORT STACKED ERROR 

TRAP 

I SKIP TO ENO Of TEST 

TRAP 
.WORD 



1.10066: 



TRAP 



CU.RROR 

C«E SCAPE 
L10066-. 



CltRROR 

OESCAPf 

1.10066 . 



CIERROR 

CltSCAPE 
I 10063-, 



SEU 01/0 



CIERROR 

CIESCAPE 
L10063 . 



C.|£^UB ::: """^" 



SUBROUTINE 4; £ PIT CHARACTERS 



CNOMCAO DMVU l.TNt l*i!1 lU/Uil MACRO M1200 
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6575 



6576 
657/ 

65 fa 

6579 
6SHO 

6581 



6582 
6583 
o584 
6585 
6586 
b58 / 
6588 
hS«Q 
65**) 
6591 
6592 
b593 

6594 



6595 
6596 
6597 
6 -j 98 
6599 
6600 

6601 



6602 
6603 
6604 
6605 
6606 
660 7 
6608 
6609 
6610 

6611 



661? 
6613 
6614 

6615 
6616 
66X7 



032160 
032160 
032160 
052162 
032166 
0321 tO 
032172 
032174 
0321/4 
032176 
0321 76 
032200 



032210 
052212 
032216 
032220 
032222 
032226 
032230 
032232 
032234 
032234 
032236 
032236 
032240 

032242 
032246 
032250 
032252 
032254 
052254 
032256 
032256 
032260 

032262 
052266 
0322/0 
0322/2 
0522 lu 
032300 
032302 
052304 
032304 
052306 
032506 
032310 

032312 

032316 

032322 
032326 



104402 
004537 
000226 
000005 
103003 

104460 

: r >4410 
U00344 

004537 
000001 
0O0007 
004557 

oooooo 
oooooo 

004537 
0OO125 

OOO010 
103003 

104460 

104410 
000304 

004537 
000321 
OOOOIO 
10 r 'X)3 

1O4460 

104410 
0O0264 

004537 
12040 7 
000245 
00453 7 
OOOlll 
OOOOIO 
103003 

104460 

104410 
0O0234 

012705 

112337 

0045 5 7 
OOOOOO 



007400 



010010 
010010 
007676 



007676 



003734 
007676 



053525 
032 326 

007676 





BCiNSUH 






JSR 


R5.INITRN 




•itNCH 






nil2!HIT0 




HCC 


. >8. 




ERROR 






ESCAPE 


sue 




JSR 


R5.TXCTRI 




TSOM 






7. 






JsR 


R5.TXCTRL 




000 













JSH 


R5.TXCHAR 




125 






8. 






HCC 


. »B, 




ERROR 






ESCAPE 


SL€ 




JSR 


R5.TXCHAR 




321 






8. 






BCC 


.♦8. 




ERROR 






ESCAPE 


SUB 




JSR 


R5,w«irn 




PCR 






Dir7!0lT5!BIT2!fUVO 




JSR 


R5, TXCHAR 




111 






8. 






BCC 


.♦fi. 




ERROR 






ESCAPE 


SUB 




MOV 


• 150 TBI ♦1.R5 


30$: 


MOVH 


<R5)» , 11 




JSR 


Ku TXCHAR 


1*1 


000 





T25.4; 



TRAP 



{LOAD 1 SOM, Cl.K TX ■ JN F II. ACTIVE 

I St I BOP MOUl ,CRC CCin-1, ,/AR.,V6 

t T N r T I Al I d TXCl -ft HITS / RXCl -5 BUS 

I BR U NO ERROR 

I REPORT STACKED ERROR 

TRAP 
j SKIP TO END UP UST 

TRAP 
.WORD 

iLOAl) 2ND KI.Ati.TX 1ST FLAG 



(CLEAR TSOM 



I LOAD 123(Hf.ADERl), TX 2ND M.Ab 



j BR If NO I RRC** 
iREPORT STACKED ERROR 



TRAP 



j SKIP TO END OK TEST 

I LOAD 321CHEA0ER2), TX 123( HfcADERl ) 



TRAP 
.WORD 



j BR O NO ERROR 

» REPORT STACKED ERROR 

iSKIP TO ENO 0^' TEST 



l NOW CHANGE TXCL. W 5 HITS TOO 



TRAP 

TRAP 
.WORD 



I LOAD 111CDATA1), TX 32K MEAUER2 ) 



iBR IF NO ERROR 
jRCPORT STACKED ERROR 

I SKIP TO END Of TEST 



TRAP 

TRAP 
.WORD 



iSET UP OAfrt TABLE POINTER 
j INST AU NEXT TX CHARACTER 

j TRANSMIT CHARACTER I. ••* R*' ( IEU ) 
1** HOLE EUR NEXT CHARACTER ** 



SFQ 01 n 



CJBSUB 



CIERROR 

C%\ SC^PE 
LI 006 7* . 



Cf ERROR 

C IE SCAPE 
E 10067- . 



CI ERROR 

CM S'TAPt 

L10O67 . 



CIERROR 

CUSCAPt 
L10067-, 
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6618 


032330 


ooooos 




6619 


032332 


103003 




6620 


032334 








032334 


104460 




6621 


032336 








032356 


104410 




6^22 

6o23 


032340 


0O02O4 




032342 


022703 


033533 


6624 


032346 


001363 




6625 








6626 


032350 


004537 


010010 


662 7 


032354 


000002 




6628 


032356 


000000 




6629 


032360 


0O453/ 


011614 


6650 


032364 


000044 




6631 








6632 


032366 


00453 7 


010110 


6633 


032372 


000523 




6634 


032374 


000000 




6635 


032376 


iOOOOO 




6636 


032400 


103003 




6637 


032402 








032402 


104460 




6638 


032404 








032404 


104410 






032406 


000136 




66 39 








6640 


032410 


004537 


010110 


6641 


032414 


000321 




6642 


032416 


000000 




6643 


032420 


100000 




6644 


032422 


103003 




6645 


032424 








032424 


104460 




6646 


032426 








032426 


104410 






032430 


000114 




664 7 








6648 


032432 


012703 


033524 


6649 


032436 


112337 


032454 


6650 


032442 


142737 


000340 


6651 








6652 


032450 


0O4537 


010110 


6653 


032454 


oooooo 




6654 


032456 


000000 




6655 


03246O 


100000 




6656 


032462 


103003 




6657 


032464 








032464 


104460 




6658 


032466 








032466 


104410 






0324 70 


000054 




6659 








6660 


0524 72 


022 703 


033531 


6661 


0324 76 


001357 




6662 









! ) ! <\ 
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BCC , »H. 

ERROR 

FSCAPF SUB 



032454 



40$ 



At 



CMP 


3T50THI *7,R3 


BNE 


10* 


JSR 


R5.TXCTRI 


TEOM 









JSR 


H5,S'flPI.U 


36. 




JSR 


R5.RXCHAR 


RXSOMH23 







NCCRDA 




BCC 


. *8. 


ERROR 




ESCAPE 


SUB 


JSR 


R5.RXCHAR 


321 









NOCROA 




BCC 


.+8. 


ERROR 





jHR If NO EHROR 

j REPORT STACKED ERROR 

I SKIP TO FND OF TEST 



: ALL CHARACTERS TRANSMITTED ? 
i If NOT, IX ANOTHFH ONf 



TRAP 

TRAP 
.WOPO 



C1ENP0R 

OF SCAPE 
L 1006 7 . 



j SET TEOM 



j AND TX DATA* ♦ SOME El. ACS 



jREAD £ CHK 123(HEADERl), RCV 321C HEAQER2) 
i 6 CHECK EOR RSOM'l 

jNO INITIAL CHECK OF RDA'O 
iBR IF NO ERROR 
sRFPORT STACKED ERROR 



I SKIP TO END Of' TEST 



TRAP 

TRAP 

.WORD 



jREAD/CHECK 3?1( HEADER2 ) . RCV OllCDATAl) 



ESCAPE SUB 



iNO INITIAL CHECK OF RDA-0 
jBR IF NO ERROR 
tREPORT STACKED ERROR 

jSKIP TO ENO Of TEST 



TRAP 

TRAP 

.WORD 



MOV ♦V30TBL,R3 

MOVB (R3)»,4* 

BIC8 0340.41 

JSR R5.RXCHAR 

000 



NOCRDA 

BCC . *8. 

ERROR 

ESCAPE sue 



CMP OT30TBL»5,R3 

BNE 401 



»SET UP OATA TABLE POINTER 

i INSTALL NEXT EXPECTED RX CHARACTER 

jMASK OUT UNTRANSMITTED BITS 

jREAO/CHECK NEXT CHARACTER 

j** HOLE FOR NEXT EXPECTED CHARACTER 

i NO INITIAL CHECK OF ROA-0 
j BR IF NO ERROR 
jREPORT STACKED EHROR 



jSKIP TO ENO OF TEST 



i AIL CHARACTERS CHECKED ? 
I IF NOT. CHECK ANOTHER ONE. 



TRAP 

TRAP 

.WORD 



Cf ERROR 

C$E SCAPE 
L10O67-. 



ClERROR 

CIESCAPE 
L10067-. 



CtERROR 

CIESCAPF 
L 100b7». 



SEQ 01 t? 



CNOMCAO 
TEST 25 

6663 

6664 
6665 
6666 

6667 
0668 

t>t?69 



6670 
6671 
6672 
6673 
6674 
6675 
6676 

6677 



6678 



66 79 
6680 
6681 
6682 



6683 
6684 
6685 
6666 
6687 

6688 



6689 
6690 
6691 
6692 
6693 
6694 
6695 
6696 
6697 
6698 
6699 
6700 

6 701 



6702 
6703 



OMVU LINE UNIT DtAGl MACRO M1200 
BOP RX CHARACTER LENGTH TEST 
O1011O 



22 -FEB -84 1 r 3 : 3 1 



I. 1 4 

PAGE 90 10 



032500 
032504 
032506 
032510 
032512 
032514 
032514 
032516 
032516 
032520 

032522 
032526 
032530 
032532 
032534 
032536 
032536 
032540 
032540 
032542 
032544 
032544 
032544 



032546 
032546 
032546 
032550 
032554 
032556 
032560 
032562 
032562 
032564 
032564 
032566 

032570 
032574 
032576 
032600 
032604 
032606 
032610 
032614 
032616 
032620 
032622 
032622 
032624 
032624 
032626 



004537 
000026 
000001 
020000 
103003 

104460 

104410 
001002 

004537 
001037 
000000 
060000 
103003 

104460 

104410 
000760 



104403 



104402 
0O4537 
000226 
000006 
103003 

104460 

104410 
000344 

0O4537 
000001 
000007 
004537 
000000 
000000 
004537 
000123 
0OO010 
103003 

104460 

104410 
000304 



JSR 
026 
RERCHK 

NCRACT 

BCC 

ERROR 

ESCAPE 



010110 



R5.RXCHAR 
.♦8, 

rsT 

R5.RXCHAR 



jREAD/CHK OATA6C026), RCV DATA7 

j L CHECK RERR BIT-0 (GOOD CRC ) 
iDON'T CHECK FOR INITIAL ROA-0 
j BR IF NO ERROR 
{REPORT STACKED ERROR 

j SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



JSR 

RXEOM'037 



NFCROAJNCRACT 

BCC . *S. 

ERROR 

ESCAPE TST 



jREAO/CHK DATA7C05/), RCV URST FLAG 
\ C CHECK FOR REOM-1 

jDQN'T CHECK FOR FINAL RDA-RXACT-1 
i BR IF NO ERROR 
jREPORT STACKED ERROR 



I SKIP TO END OF TEST 



ENDSU6 



L 10067 j 



TRAP 

TRAP 
.WORD 



TRAP 



SUBROUTINE 5: 6 BIT CHARACTERS 



007400 



BONN'S 



JSR 

SYNCH 

BIT2JBIT1 

BCC 

ERROR 

ESCAPE 



Rb.TNITRN 

1 
.♦8. 

SUB 



010010 
010010 
007676 



032630 004537 007676 



JSR 

TSOH 

7. 

JSR 

000 



JSR 

123 

8. 

BCC 

ERROR 

ESCAPE 



JSR 



R5. fXCTRL 
R5.TXCTRL 
R5.TXCHAR 
. »8. 
SL8 

R5.TXCHAR 



T25.5: 

TRAP 
iLOAD 1 SOW. CLK TX UNTIl MCTIVF 
iSET BOP MOOE.CRC CCITI -l.S/AR-226 
iINITIALIV; TacL-8 BITS / RXCL-6 BITS 
ion ir NO ERROR 
jREPORT STACKED ERROR 



j SKIP TO END OF TEST 

jLOAD 2N0 FLAG.TX 1ST FLAG 

jCLEAR TSOM 

jLOAD 123CHEADER1), TX 2N0 FLAG 



jBR IF NO ERROR 
jREPORT STACKED ERROR 

jSKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



CSERROR 

CIESCAPE 
L10063-. 



CJERROR 

CIESCAPE 
L 10063 -. 



C*ESUB 



CJBSU6 



CIERROR 

CIESCAPE 

L10070-. 



CIERROR 

CtESCAPE 
I. LOO 70*. 



SEQ 01/5 



jLOAD 32KHEADER2). TX 123CHEADER1) 



4 



CNOMCAO OMVU LINE UNIT DTAGi MACRO M120Q 
TEST 2^ -■ BOP RX CHARACTER LENGTH TEST 



6 704 


032634 


000321 




6705 


032636 


0000 10 




6706 


032640 


103003 




6707 


032642 








032642 


104460 




b708 


032644 








032644 


104410 






032646 


000264 




6709 








6710 


032650 


004537 


003734 


6711 


032654 


120407 




6712 


032656 


000306 




6713 


032660 


004537 


007676 


6714 


032664 


000111 




6715 


032666 


000010 




6716 


032670 


103003 




6717 


032672 








032672 


104460 




6718 


032674 








032674 


104410 






032676 


000234 




6719 








6720 


032700 


012703 


033525 


6721 


032704 


112337 


032714 


6722 








6723 


032710 


004537 


007676 


6724 


032714 


000000 




6 725 


032716 


000006 




6726 


032720 


103003 




6727 


032722 








032722 


104460 




6728 


032724 








032724 


104410 






032726 


000204 




6/29 








6730 


032730 


022703 


033533 


6731 


032734 


001363 




6732 








6733 


032736 


004537 


010010 


6734 


032742 


0OOO02 




6735 


032744 


000000 




6736 


032746 


004537 


011614 


6737 


032 752 


000044 




6738 








6739 


032754 


004537 


010110 


6740 


032760 


000523 




6741 


032762 


000000 




6742 


032764 


10OOO0 




6743 


032766 


103003 




6 744 


032770 








032770 


104460 




6745 


032772 








032772 


104410 






032774 


000136 




6746 








6747 


032776 


00453 7 


010110 


6748 033002 


000321 





10$ 
Hi 
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321 

8. 

BCC . *8. 

ERROR 

ESCAPE SUB 



JSR R5.WRITEI 

PCR 

BIT7!BIT6!3IT2!B1T1 

JSR R5,TXCHAR 

111 

8. 

BCC ,»8. 

ERROR 

ESCAPE sue 



,BR IF NO ERROR 

j REPORT STACKED ERROR 

j SKIP TO END OF TEST 



jNOW CHANGE TXCL TO 6 BITS TOO 



TRAP 

TRAP 
.WORD 



jLOAD 11KDATA1), IX 32KHEADER2) 



j8R IF NO ERROR 
{REPORT STACKED ERROR 

jSKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



MOV 

MOVB 

JSR 

000 

6. 

BCC 

ERROR 

ESCAPE 



CMP 
GNE 



*T30TBL*1,R3 
(R3)».lt 

R5.TXCHAR 

.♦8. 

SUB 



*T30TBLt7,R3 
lOi 



5 SET UP DATA TABLE POINTER 
j INSTALL NEXT TX CHARACTER 

{TRANSMIT CHARACTER ( •-> RX/FIFO ) 
;** HOLE FOR NEXT CHARACTER *♦ 



;BR JF NO ERROR 
{REPORT STACKED ERROR 

j SKIP TO END OF TEST 



lALL CHARACTERS TRANSMITTED ? 
, IF NOT, TX ANOTHER ONE 



TRAP 

TRAP 
.WORD 



JSR R5.TXCTRL 

TEOM 



JSR R5.STEPLU 

36. 

JSR R5.RXCHAR 

RXS0M!123 



NOCRDA 

BCC ,*8. 

ERROR 

ESCAPE SUB 



CiERROR 

CSESCAPE 
1,10070-. 



C TERROR 

C1ESCAPE 
L10070-. 



CiERROR 

CfEFCAPE 
L10070-. 



I SET TEOM 



j ANO TX DATA7 ♦ SOME FLAGS 



:READ 6 CHK 123CHEADER1), RCV 32KHEADER2) 
I £ CHECK FOR RSOM-1 

{NO INITIAL CHECK OF RDA-0 
j BR IF NO ERROR 
jREPORT STACKED ERROR 



jSKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



C*ERROR 

CiFSCAPE 
L10070-. 



SfcQ 0174 



JSR 
321 



R5.RXCHAR 



{READ/CHECK 32KHEADER2 ) ,RCV Oll(DATAl) 



r, i f\ 
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itST 25 -• BOP RX CHARACTER LENGTH TEST 



NOCRDA 

BCC , *8. 

ERRUR 



6749 


033004 


000000 




6750 


033006 


100000 




6751 


033010 


i03003 




6752 


03301? 








0330^2 


104460 




6753 


033014 








033014 


104410 






033016 


000114 




6754 








6755 


033020 


012703 


033524 


6756 


033024 


112337 


033042 


6757 


033030 


142737 


000300 033042 


6758 








6759 


033036 


004537 


010110 


6760 


033042 


OOOOOO 




6761 


033044 


000000 




6762 


033046 


100000 




6763 


033050 


103003 




6764 


033052 








033052 


104460 




6765 


C 33054 








0^3054 


104410 






033056 


000054 




6766 








6767 


033060 


022703 


033531 


6768 


033064 


001357 




6769 








6770 


033066 


004537 


010110 


6771 


033072 


000066 




6772 


033074 


000001 




6773 


033076 


020000 




6774 


033100 


103003 




6775 


033102 








033102 


104460 




6776 


033104 








033104 


104410 






033106 


000414 




6777 








6778 


033110 


004537 


010110 


6779 


033114 


001077 




6780 


033116 


OOOOOO 




6781 


033120 


060000 




6782 


03?122 


103003 




6783 


033124 








033124 


104460 




6784 


033126 








033126 


104410 






033130 


000372 




6785 


033132 

033132 








033132 


104403 




6/86 








6787 








6788 








6789 


033134 
033134 
033134 


104402 





40$: 



4$: 



ESCAPE sue 



;N0 INITIAL CHECK OF RDA-0 
}BR IF NO ERROR 
jREPORT STACKED ERROR 

j SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



MOV 


0T30TBUR3 


MOVB 


(R3)».4t 


BICB 


4300, 4$ 


JSR 


R5.RXCHAR 


000 









NOCRDA 




BCC 


.♦8. 


ERROR 





;SET UP DATA TABLE POINTER 

j INSTALL NEXT EXPECTED RX CHARACTER 

{MASK OUT UNTRANSMITTED BITS 

j READ/CHECK NEXT CHARACTER 

;** HOLE FOR NEXT EXPECTED CHARACTER 

j NO INITIAL CHECK OF RDA-0 
iBR IF NO ERROR 
;REPORT STACKED ERROR 



ESCAPE SUB 



CMP 0T3018L*5,R3 
BNE 40 i 



{SKIP TO END OF TEST 



{ALL CHARACTERS CHECKED ? 
; IF NOT, CHECK ANOTHER ONE 



TRAP 

TRAP 
.WORD 



R5.RXCHAR 



JSR 

066 

RERCHK 

NCRACT 

BCC . *8. 

ERROR 

ESCAPE TST 



JSR R5.RXCHAR 

RXEOMI077 



NFCRDA! NCRACT 

BCC .*8. 

ERROR 

ESCAPE TST 



,READ/CHK DATA6C066). RCV DATA? 

i C CHECK RERR BIT-0 (GOOD CRC ) 
jDON'T CHECK FOR INITIAL RDA«0 
;BR IF NO ERROR 
jREPORT STACKED ERROR 

{SKIP TO ENO OF TEST 



TRAP 

TRAP 

.WORD 



jREAD/CHK DATA7C077), RCV FIRST FLAG 
; 6 CHECK FOR REOM-l 

{DON'T CHECK FOR FINAL RDA-RXACT-1 
5 BR IF NO ERROR 
{REPORT STACKED ERROR 



{SKIP TO END OF TEST 



ENDSUB 



L 10070: 



TRAP 

TRAP 
.WORD 



TRAP 



5F.Q 0175 



C TERROR 

CiESCAPE 
L10070-. 



CSERROR 

CiESCAPF 
L10070-. 



CtfcRROR 

CtESCAPE 
L 10063 -. 



CtERROR 

CiESCAPF 
L 10063 . 



CIESUB 



{ SL^ROUTINE * 6: 7 BIT CHARAC 
BGNSUB 



TERS 



T25.6: 



TRAP 



C*BSLB 



l-M/i 
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SEQ 01/6 



6790 


033136 


00453; 


0074C0 


JSR 


R5.INITRN 


6791 


033142 


000226 




SYNCH 




6792 


033144 


000007 




RXOL. 




6793 


033146 


103003 




BCC 


. *8. 


6794 


033150 
033150 


104460 




ERROR 




b795 


033152 
033152 
033154 


104410 
000344 




ESCAPE 


SUB 


6796 












6797 


033156 


004537 


010010 


JSR 


R5.TXCTRL 


6796 


033162 


000001 




TSOM 




6799 


033164 


000007 




/. 




6800 


03ciit>6 


004537 


010010 


JSR 


R5.TXCTRI. 


6801 


033172 


000000 




000 




6802 


033174 


000000 









6803 


033176 


004537 


007676 


JSR 


R5.TXCHAR 


6804 


033202 


000123 




123 




6805 


033204 


000010 




8. 




6806 


033206 


103003 




BCC 


,♦8. 


6807 


033210 
033210 


104460 




ERROR 




6808 


033212 
033212 
033214 


104410 
000304 




ESCAPE 


SUB 


*809 












6810 


033216 


004537 


0076/6 


JSR 


R5.TXCHAR 


6811 


033222 


000321 




321 




6812 


033224 


000010 




8. 




6813 


033226 


103003 




BCC 


.♦8. 


6814 


033230 
033230 


« 04460 




ERROR 




6815 


033232 
033232 
033234 


104410 
000264 




ESCAPE 


sue 


6816 












6817 


033236 


004537 


003734 


JSR 


R5.WRITEI 


6818 


033242 


120407 




PCR 




6819 


033244 


000347 




TXOURXDl 


6820 


033246 


004537 


007676 


JSR 


R5.TXCHAR 


6821 


033252 


000111 




111 




6822 


033254 


000010 




8. 




6823 


033256 


103003 




BCC 


.♦6. 


6824 


033260 

033260 


104460 




ERROR 




6825 


033262 
033262 
033264 


104410 
000234 




ESCAPE 


sua 


6826 












Www 

6827 


033266 


012703 


033525 


MOV 


#T30TBL»1,R3 


6828 


033272 


112337 


033302 


10$; M0V8 


(R3)»,ll 


6829 












6830 


033276 


004537 


007676 


JSR 


R5.TXCHAR 


6831 


033302 


000000 




1$: 000 




6832 


033304 


0000O7 




7. 




6833 


033306 


103003 




BCC 


.♦8. 


6834 


033310 






ERROR 





jLOAD 1 SQM, CLK IX UNTIL ACTIVt 
;SET BOP M0DE,CRC-CCITT-1,S/AR*226 
jINITIALLY; TXCL-? BITS / RXCL-7 BIT'> 
5 BR IF NO ERROR 
;REP0RT STACKED ERROR 



? SKIP TO END OF TEST 



;L0AD 2ND FLAG.TX 1ST FLAG 



TRAP 

TRAP 
.WORD 



jCLEAR TSOM 



{LOAD 123(HEADER1)« TX 2ND FLAG 



{BR IF NO ERROR 
{REPORT STACKED ERROR 

;SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



{LOAD 32HHEADER2), TX 123CHEADER1) 



{BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



jNOW CHANGE TXCL TO 6 BITS TOO 



TRAP 

TRAP 
.WORD 



{LOAD 11KDATA1), TX 321CHEADER2) 



j BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



jSET UP DATA TABLE POINTER 
{INSTALL NEXT TX CHARACTER 

j TRANSMIT CHARACTER ( ••> RX/FIFO ) 

{** HOLE FOR NEXT CHARACTER ** 

;BR IF NO ERROR 
{REPORT STACKED ERROR 



CIERROR 

CftSCAPt 
L100/1-. 



CiERROR 

CJESCAPE 
L10071-. 



CJERROR 

CIESCAPE 
L10071 -. 



CtERROR 

CJESCAPE 
L10071-. 



1.4 



CNOMCAO DMV11 l.IW UNIT DIAG1 MACRO M1200 
TEST 25 BOP RX CHARACTER LENGTH TEST 



6835 



6836 
6837 
6838 
6839 
6840 
6841 
6842 
6843 
6844 
6845 
6846 
6847 
6848 
6849 
6850 
6851 

6852 



6853 
6854 
6855 
6856 
6857 
6858 
6859 

6860 



6861 
6862 
6863 
6864 
6865 
6866 
6867 
6868 
6869 
68 70 
6871 

6872 



6873 

6874 
6875 
6876 
6877 
6878 
6879 



033310 
033312 
033312 
033314 

033316 
033322 

033324 
033330 
033332 
033334 
033340 

033342 

033346 
033350 
033352 
033354 
033356 
033356 
033360 
033360 
033362 

033364 
033370 
033372 
033374 
033376 
033400 
035400 
033402 
035402 
035404 

033406 
033412 
033416 

035424 
055430 
035452 
055454 
035456 
055440 
055440 
055442 
035442 
033444 

035446 
033452 

033454 
035460 
033462 



104460 

104410 
000204 

022705 033533 
001363 

004537 010010 

000002 

000000 

004537 011614 

000044 

004537 010110 

000523 

OOCOOO 

100000 

103003 

104460 

104410 
000136 

004557 010110 

000321 

OOOOOO 

100000 

103003 

104460 

104410 
0O0114 



012703 033524 

112357 035430 40* 

142737 000200 033430 



004537 010110 

OOOOOO 

OOOOOO 

100000 

105005 

104460 

104410 
000054 

022703 0335M 
001357 

004537 010110 

000066 

000001 



4$ 
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ESCAPE SUB 



CMP #T50TBL*7,R3 

BNE 105 



{SKIP TO END OF TEST 



{ALL CHARACTERS TRANSMITTED ? 
} IF NOT, IX ANOTHER ONE 



TRAP 

TRAP 

.WORD 



C TERROR 

C ESCAPE 
L10071-. 



JSR R5.TXCTRL 

TEOM 



JSR R5,STEPLU 

36. 

JSR R5.RXCHAR 

RXS0MJ123 



NOCRDA 

BCC . *8. 

ERROR 

ESCAPE SUB 



{SET TEOM 



{ AND TX DATA7 * SOME FLAGS 



{READ £ CHK 123CHEADERD, RCV 32KHEAUER2) 
} C CHECK FOR RSOM-1 

{NO INITIAL CHECK OF RDA-0 
;BR IF NO ERROR 
{REPORT STACKED ERROR 



j SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



JSR 

321 



NOCRDA 

BCC 

ERROR 



R5.RXCHAR 



♦ 8. 



{READ/CHECK 321(H€ADER2),RCV 01HDATA1) 



ESCAPE sie 



;N0 INITIAL CHECK OF RDA-0 
j BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



MOV 

MOVB 

BICB 

JSR 

000 



NOCRDA 

BCC 

ERROR 

ESCAPE 



CMP 
BNE 



*T30TBL,R3 

CR3)»,4$ 

0200,4$ 

R5.RXCHAR 



♦ ♦8. 

sue 



*T30TBL*5,R3 
40$ 



{SET UP DATA TABLE POINTER 

{INSTALL NEXT EXPECTED RX CHARACTER 

{MASK OUT UNTRANSMITTED BITS 

{READ/CHECK NEXT CHARACTER 

I** HOLE FOR NEXT EXPECTED CHARACTER 

{NO INITIAL CHECK OF RDA-0 
{BR IF NO ERROR 
{REPORT STACKED ERROR 



{SKIP TO ENO OF TEST 



lALL CHARACTERS CHECKED ? 
j IF NOT, CHECK ANOTHER ONE 



TRAP 

TRAP 
,WORD 



JSR 
066 
RERCHK 



R5.RXCHAR 



{READ/CHK DATA6C066), RCV DATA7 
j 6 CHECK RERR BIT-0 (GOOD CRC) 



CIERROR 

CiESCAPE 
L10071-. 



CiERROR 

CiESCAPF 
L 10071 - 



C tERROR 

CSESCAPE 
L10071-. 



SEQ 0177 



f\ 



CNDMCAO 


DMV1 1 LINE UNIT 


DIAC 


Jl MACRO M1200 22* FEB -84 


15:31 


PAGE 90-15 


TEST 25 


- BOP 


RX CHARACTER 


LENGTH 


TEST 






6880 


033464 


020000 






NCRACT 






6881 


033466 


103003 






BCC 


.♦8. 




6882 


0334 70 
033470 


104460 






ERROR 






6883 


033472 
0334 72 
0334 74 


104410 
000026 






ESCAPE 


TST 




6884 
















6885 


0334 76 


004537 


010110 


JSR 


R5.RXCHAR 


6886 


033502 


001177 






RXEOM! 


L77 




6887 


033504 


000000 













6888 


033506 


060000 






NFCRDA 


NCRACT 




6889 


03351C 


103003 






BCC 


.♦8. 




6890 


0335U 
03351c 


104460 






ERROR 






6891 


055514 
033514 
033516 


104410 
000004 






ESCAPE 


TST 




6892 


033520 
033520 
033520 


104403 






ENOSUB 






6893 


033522 
033522 
033522 


104401 






ENOTST 






6894 
6895 
















033524 


111 






T30TBL: .BYTE 


111 


iDl 


6896 


033525 


222 






.BYTE 


222 


5 02 


6897 


033526 


333 






.BYTE 


333 


jD3 


6898 


053527 


044 






.BYTE 


044 


;D4 


6899 


033530 


155 






.BYTE 


155 


;D5 


6900 


033531 


266 






.BYTE 


266 


;06 


6901 


033532 


377 






.BYTE 


377 


l07 


6902 










.EVEN 






6903 

















SEQ 0178 



jDON'T CHECK FOR INITIAL RDA*0 
j BR IF NO ERROR 
{REPORT STACKED ERROR 

j SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



C TERROR 

C*ESCAPt 
L 10063-. 



;READ/CHK DATA7C177), RCV FIRST FLAG 
j I CHECK FOR REOM-1 

{DON'T CHECK FOR FINAL. RDA-RXACT = 1 
;BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 





TRAP 


CSERROR 




TRAP 
.WORD 


CiESCAPF 
L 10063- . 


L10071: 


TRAP 


C$ESUB 


L 10063: 


TRAP 


CJETST 



CNDMCAO DMV11 LINF. UNIT DIAGL MACRO 
TEST 26 • • TX "SPACING SEQUENCE" 
6911 



6912 
6913 
6914 
6915 
6916 
6917 
6918 
6919 
6920 
6921 
6922 
6923 
6924 
6925 
6926 
6927 
6928 
6929 
6930 
6931 
6932 
6933 
6934 
6935 
6936 
6937 
6938 
6939 
6940 
6941 
6942 
6943 
6944 
6945 
6946 
6947 

6948 



6949 
6950 



033534 
033534 



033540 
033544 
033546 
033550 
033554 
033556 
033560 
033564 
033566 

033570 
033574 
033576 
033600 
033604 
033606 

033610 
033614 
033616 
033620 
033624 
033626 

033630 
033634 
033636 

033640 
033644 
033646 
033650 
033650 
033652 
033652 
033654 



004737 005420 



004537 
120013 
000200 
004537 
120OO6 
000300 
004537 
120O07 
000000 

004537 
120000 
000031 
004537 
120000 
000030 

004537 
120404 
OOOOOO 
004537 
120405 
000007 

004537 
120OO0 
000172 

004537 
000001 
103003 

104460 

104410 
000234 



003734 
003734 
003734 

003734 
003734 

003734 
003734 

003734 
006036 



K'1.4 

M1200 22 --r£8-64 15:31 PAGE 91 

.SBTTL TEST 26 - - TX "SPACING SEQUENCE" 

* 

* TEST 26 - TX "SPACING SEQUENCE" 

♦ 

* THE TRANSMITTER IS INITIALIZED AND THE "SPACING SEQUENCE" IS FORCED 

* BY ASSERTING BOTH TSOM L TEOM AT THE SAME TIME -- CHECK THE BIT 

* STREAM FOR ACCURACY (SPACES) AND COMPLETNESS C 16 OF THEM). WHEN TXBE 

* GOES HIGH (« 1) A SMALL MESSAGE IS SENT. 

* 



SEQ 01/9 



BGNTST 

JSR PC.INIDMV 



jINIT VIA 



T26j : 



; SET UP USYRT AND VIA REGISTERS 



JSR R5.WRITEI 

VIAACR 

200 

JSR R5.WRITEI 

VIATIC 

300 

JSR R5.WRITEI 

VIAT10 

000 

JSR R5.WRITEI 
VIAORB 

RTSND!DTR! PRESET 
JSR R5, WRITE! 
VIAORB 
RTSNOIOTR 

JSR R5.WRITEI 

PCSARL 

000 

JSR R5.WRITEI 

PCSARH 

XYZ 



JSR R5.URITEI 

VIAORB 

RTSNO!TXEN!RXEN!DTR!TTLOOP 



{SET ACR FOR Tl ONE -SHOT MODE 
{LOAD VIA TILL 
{LOAD VIA T1L-H 

{RESET THE USYRT 
{CLEAR USYRT RESET BIT 

{LOAD USYRT PCSARL 

{LOAD USYRT PCSARH 
{(NO ERROR CHECKING) 
{SET UP USYRT 



JSR 
1 

BCC 
ERROR 



R5,CKTBMT 
.♦8. 



iCHK FOR TBMT - 1 

,IF NO ERROR. PROCEED 
{ELSE, REPORT IT AND 



ESCAPE TST 



J 



EXIT THIS TEST 



TRAP 

TRAP 

.WORD 



C*ERROR 

CSESCAPE 
L10072-. 



i INIT SPACING SEQUENCE Bt SETTING TSOM AND TEOM 



1.4 



CNDMCAO DMV11 LINE, UNIT DIAGL MACRO M1200 22-FEB-84 lb: 31 PAGE 91 1 
TEST 26 -- TX "SPACING SEQUENCE** 



SEQ 0180 



69*51 




















6952 


033656 


004537 


010010 


6$: JSP 


R5.TXCTRL i 


SET TSOM AND TCOM 








6953 


033662 


000003 




T C OM!TEOM 


("SPACING SEQUENCE") 








6954 


033664 


000000 

















6955 




















fo956 


033666 


004537 


011614 


JSR 


R5.STEPLU 


1 TICK TO START SPACE SEQUENCE 






6957 


033672 


000001 




1 












6958 




















6959 


033674 


004537 


007256 


JSR 


R5, SERIAL 


READ 000 CHARACTER VIA 


T50 






6960 


033700 


000010 




8. 




8 BIT CHAR/CLOCK TICKi 








6961 


033702 


000000 




000 




EXPECTED BIT SEQUENCE 


C 0000000) 




6962 


033704 


103003 




BCC 


. »8, 


BR IF NO ERROR 








6963 


033706 
033706 


104460 




ERROR 




REPORT STACKED ERROR 




TRAP 


C1ERR0R 


6964 


033710 
033710 
033712 


104410 
00C176 




ESCAPE 


TST 


AND EXIT TEST 




TRAP 
.WORD 


CiF. r ,CAPF 
L 10072 -. 


6965 




















6966 


033714 


004537 


006036 


JSR 


R5.CKTBMT 


CHK TOR TBMT - 1 








6967 


033720 


000001 




1 












6968 


033722 


103003 




BCC 


♦ +8. 


IF NO ERROR, PROCEED 








6969 


033724 
033724 


104460 




ERROR 




ELSE, REPORT IT AND 




TRAP 


C*ERROR 


6970 


033726 
033726 
033730 


104410 
000160 




ESCAPE 


TST 


EXIT THIS TEST 




TRAP 
.WORD 


C$ESCAPE 
L 10072 -. 


6971 

6972 




















033732 


004537 


010010 


JSR 


R5.TXCTRL 


CLEAR TEOM 








6973 


033736 


000001 




TSOM 












6974 


033740 


000000 

















69/5 




















6976 


033742 


004537 


007256 


JSR 


R5, SERIAL 


READ 000 CHARACTER VIA 


rso 






6977 


033746 


000010 




8. 




8 BIT CHAR/CLOCK TICKS 








6978 


033750 


000000 




000 




EXPECTED BIT SEQUENCE 


(00000000) 




6979 


033752 


103003 




BCC 


. *8, 


BR IF NO ERROR 








6980 


033754 
033754 


104460 




ERROR 




{REPORT STACKED ERROR 




TRAP 


C* ERROR 


6981 


033756 
033756 
033760 


104410 
000130 




ESCAPE 


TST 


.AND EXIT TEST 




TRAP 
.WORD 


C$ESCAPE 
L 10072 -. 


6982 




















6983 


033762 


004537 


006036 


JSR 


R5.CKT8MT 


{CHK FOR TBMT - 1 








6984 


033766 


000001 




1 












6985 


033770 


103003 




BCC 


♦ ♦8. 


j IF NO ERROR. PROCEED 








6986 


033772 
033772 


104460 




ERROR 




{ELSE, REPORT IT AND 




TRAP 


C TERROR 


6987 


033774 
033774 
033776 


104410 
000112 




ESCAPE 


TST 


I EXIT THIS TEST 




TRAP 
.WORD 


CSESCAPr 
L 10072 -. 


6988 




















6989 








1 SEND "SHORT MESSAGE" (125.252) 










6990 




















6991 


034000 


004537 


003734 


JSR 


P5.WRITEI 


j LOAD 125 CHARACTER 








6992 


034004 


120402 




TDSRL 












6993 


034006 


000125 




125 












6994 


034010 


004537 


010010 


JSR 


R5JXCTRL 


I CLEAR TSOM 








6995 


034014 


QOOOOO 




QQO 













CNDMCAO DMV11 LINF UN II DIAG1 MACRO M1POO 
TEST 26 ••- TX "SPACING SEQUENCE" 



6996 
6997 
6998 
6999 

7000 
7001 
7002 

7O03 



7004 
7005 
7006 
7007 
7008 
7009 
7010 
7011 
7012 
7013 

7014 



7015 
7016 
7017 
7018 
7019 
7020 

7021 



7022 



034016 000000 



034020 
034024 
034026 
034030 
034032 
034032 
034034 
0340J4 
034036 

034040 
034044 
034046 

034050 
034054 
034056 
034060 
034062 
034062 
034064 
034064 
034066 

034070 
034074 
034076 
034100 
034102 
034102 
034 104 
034104 
034106 
034110 
034110 
034110 



004537 007256 
000010 
000176 
103003 

104460 

104410 
000052 

004537 003734 

120402 

000252 

004537 007256 
000010 
000252 
103003 

104460 

104410 
000022 

004537 007256 
000010 
000125 
103003 

104460 

104410 
000002 



104401 



!2-rF.B-64 15:31 







M 1 4 

PAGE 91-2 



JSR 

8. 

176 

BCC 

FRROR 


R5, SERIAL 
.♦8. 


ESCAPE 


TST 


JSR 

TDSRL 

252 


R5.WRITEI 


JSR 

8. 

252 

BCC 

ERROR 


Rb, SERIAL 
.♦8. 


ESCAPE 


TST 


JSR 

8. 

125 

BCC 

ERROR 


R5, SERIAL 
.♦8. 



ESCAPE TST 



SEQ 0181 



{READ FLAG CHARACTER (176) VIA ISO 

; 8 BIT CHAR/CLOCK TICKS 

; EXPECTED BIT SEQUENCE (01111110) 

5 BR IF NO ERROR 

, REPORT STACKED ERROR 

TRAP C$ ERROR 

{AND EXIT TEST 

TRAP C*F: SCAPE 

.WORD L1O072*. 

{LOAD 252 CHARACTER 



{READ 1ST DATA CHARACTER (12^) VIA TSO 

} 8 BIT CHAR/CLOCK TICKS 

{ EXPECTED BIT SEQUENCE (01010110} 

; BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP C$ERR0R 

{AND EXIT TEST 

TRAP CiESCAPE 

.WORD L 10072^. 

{READ 2ND DATA CHARACTER (252) VTA TSO 

} 8 BIT CHAR/CLOCK TICKS 

; EXPECTED BIT SEQUENCE (1O1O101O) 

; BR IF NO ERROR 

{REPORT STACKED ERROR 

TRAP CtERROR 

{AND EXIT TEST 

TRAP CiESCAPE 



ENDTST 



L10O72: 



.WORD 



TRAP 



L 10072 . 



C$ETS1 



CNDMCAO DMV11 LINK UNIT 
TtST 27 -• FIFO OVERRUN 
7037 



DTACU 
INTfcGRIT 



7038 
7039 
7040 
7041 
7042 
704? 
7044 

7045 



7046 
7047 
7048 
7049 
7050 
7051 
7052 
7053 
7054 
7055 
7056 
7057 
7058 
7059 
7060 
7061 
7062 
7063 

7064 



7065 
7066 



034112 
034112 

034116 
034122 
034124 
034126 
034130 
034130 
034132 
054132 
034134 
034136 
034142 
034144 

034146 
034152 
034154 



034156 
034162 

034166 
034172 
034174 
034176 
034200 
034200 
034202 
034202 
034204 



004737 

004537 
043626 
000000 
103003 

104460 

104410 
000324 
00453 7 
000001 
000007 

004537 
000000 
000000 



012702 
112237 

004537 
000000 
100010 
103003 

104460 

104410 
000254 



N14 

MACRO M1200 22 -FEB -84 15:21 PAGE 92 
Y TtST 

.5BTTL TEST 27 FIFO OVERRUN INTEGRITY TEST 

* 

* TEST 27 -- FIFO OVERRUN INTEGRITY TEST 
+. 

i- 

* THIS TEST BEGINS BY SYNCHRONIZING THE RECEIVER AND THEN PROCEEDS TO Fit. I, 

* THE 8 CHARACTER RECEIVER FIFO UNTIL RXOR WITH THE CHARACTERS; 
+ (SfNCH), 000, 37 7, 125, 252, 34 7, 030, 303, 074, 125. 

* THESE CHARACTERS ARE THEN READ OFF OF THE FIFO AND CHECKED, OF IMPORTANCE 

* IS THE INTEGRITY OF THE LAST OVERRUN-CAUSING FIFO CHARACTER CIT SHOULD 

* REMAIN INTACT). 

* NOTE THAT NO CLOCKS ARE PROVIDED WHEN RECEIVING THE CHARACTERS SINCE THEY 

* ARE SUPPLIED BY THE FIFO SUPPORT LOGIC IN GROUPS OF 4 TICKS CWHEN 

* RDA * 0). 

* 
* 
- .44444 ******************* 4 4* ***** *** *****4* 4 44**4 ********* 44444444«A44i*44A* 



SEQ 0162 



005420 
007400 



010010 



010010 



034462 
034172 

007676 



BGNTST 

JSR PLMNIDMV 

JSR R5,INITRN 

DDCMP!NOCHK) SYNCH 



BCC . *8. 

ERROR 

ESCAPE 



JSR 

TSOM 

7. 

JSR 
000 





TST 
R5.TXCTRL 

R5.TXCTRL 



T27: : 
jINIT DMV-11, ENTER M LOOP 

{LOAD 1 SOM, CLK TX UNTIL ACTIVE 
;SET DDCMP.NO CHECK ,SYMCH*226 
j USE 8 BIT CHARS 
;BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{OUTPUT 1ST SYNC CHARACTERS 



{CLEAR TSOM 



5 FILL THE FIFO WITH CHARACTERS AND FORCE OVERRUN 
• ~ ~ ~ ~ 

5$: 



MOV 
MOVB 



0TXTBL4.R2 
tR2)*,10$ 



{SE1 UP TABLE POINTER 

I SETUP TRANSMIT CHARACTER 



10$ 



R5.TXCHAR 



JSR 
000 

NCTBMT4256, J8. 
BCC . *8, 
ERROR 

ESCAPE TST 



034206 022702 034475 



CMP 



MXEND4.R2 



{TRANSMIT A CHARACTER 

j** HOLE FOR NEXT TX CHARACTER 

{NO CHECK OF INITIAL TBMT-0 

•,BR IF NO ERROR 

{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{CONTINUE TRANSMITTING UNTIL 



TRAP 

TRAP 
.WORD 



CSERRUR 

C$ESCAPE 
L10073-. 



TRAP 

TRAP 

.WORD 



CSERROR 

CSESCAPE 
L10073-. 



CNOHCAO 


DMV11 1 


in* tiNii 


DTAt.l MACMU 


M1200 , 


V M N 84 


IS! 51 PALit 9 


2 1 


SE r J 


0185 




TtST 27 


rito 


OVt RRUN 


INU-l.FUlY Tf ST 
















706 7 


034212 


001363 






RNE 


S* 


jOVFRRUN. 








70W* 






















706^ 


034214 


004537 


0064 76 




JSR 


RS.CKROR 


iVERTM RE'Cl.f -■."'"■■RRUN UCCUREU 








7070 


054220 


000001 






1 












"071 


054222 


103003 






BCC 


, *B, 


iBR IF OK 








70 7? 


054224 
054224 


10-1460 






ERROR 




jRFPORT STACKED ERROw 

TRAP 


C if RROR 






■'073 


054226 
034226 
034230 


104410 
000230 






ESCAPE 


1ST 


j SKIP TO ENO Of TE5,T 

TRAP 
.WORD 


CUSCAf'E 
1.10071- . 






*074 








i 














70 75 








i THE 


RECEIVER 


SHOULD HAVE OVERRUN. VERIFr THIS ANO PEAD/VERIFr 








70 76 
70 7 7 
70 78 








{ THE 


REMAINING 


i riFO CHARACTERS (ESPECIALLY THt I AST ONE). 








054232 


004537 


010110 




JSR 


R5.RXCHAR 


iREAD I CHK CHARACTER 








7079 


034236 


000226 






SyNCH 




1 (THIS CHARACTER ISN'T AFFECTED) 








7000 


034240 


OOCOOO 



















7081 


034242 


100000 






NUCRDA 


j NO 


INITIAL CHECK Of ROA-0 








7062 


034244 


10*003 






BCC 


. »8. 


iBR IF NO ERROR 








7065 


034246 
034246 


104460 






ERROR 




iRIPORT STACKED ERROR 

TRAP 


CUPROR 






7064 


054250 
034250 
034252 


104410 
000206 






ESCAPE 


TbT 


iSKIP TO ENO OF" TEST 

TRAP 
.WORD 


C IE SCAPE 
1.10073- . 






7065 






















7086 


034254 


004537 


010110 




JSR 


R5.RXCHAR 


iREAD t CHK CHARACTER 








708 7 


034260 


000000 






000 




j (THIS IS THt OVERWRITTEN CHARACTER) 








7088 


03"i 262. 


oooooo 











1 ...WAS A "SlNCH" BEFORE OVERWRITTEN 








7089 


034264 


100000 






NOCROA 


iNO 


INITIAL CHECK OF ROA-0 








7090 


034266 


103003 






BCC 


. »8. 


i BR IF NO ERROR 








7091 


034270 
034270 


104460 






ERROR 




iREPORT STACKED ERPOR 

TRAP 


C« ERROR 






709.? 


0342 72 
034272 
034274 


104410 
000164 






ESCAPE 


TST 


iSKIP TO ENO Of* TEST 

TRAP 

.WORD 


ClEsTAPh 
1.100 73 






7095 




7094 


034276 


012702 


034465 




MOV 


♦TXTBL4»5.R^ 


' jScT ;jp TABLE POINTER 








7095 


OV 302 


112237 


034512 


151: 


MOVB 


(R2)».20» 


ibtTlP EXPECTED CHARACTER 








7096 

709 7 


034306 


004537 


010110 




JSR 


R5.RXCHAR 


,READ C CHK CHARACTER 






:Z "■ 






jz:~"": - 


— S—21"-.-.—. 


7096 


034312 


OOOOOO 




201: 


000 




!*• HOLE FOR EXPECTED RECEIVE CHAR. 








7099 


034314 


OOOOOO 











1 








7100 


034316 


100000 




- 


NOCRDA 


jNO 


INITIAL CHECK OF RDA-0 














7101 


034 320 


103005 




— 


BCC 


, ♦S. 


j BR IF NO ERROR 












7102 


034 322 
0343*>2 
034324 
034 524 
034 326 


104460 




■: ._=== 


ERROR 




, REPORT STACKED ERROR 

TRAP 


CI ERROR 





....... .11.. 


7105 




... * .. 


104410 
000132 


— 


— ^. 


ESCAPE 


TST 


—j SKIP TO ENO OF TEST 

TRAP 





. _ _ 


- —. — 




. _ . . _ 


._ 


j. . 








CfESCAPE 
















• WORD 


tlOG^^'"-- " 


' 




7104 


34 550 
054 534 


022 702 

001362 


034472 




JCMP 
4BNE 


#TXEND4-S,R; 
151 


» 








7105 
7106 

7107 
7 1 08 


-..-.- ^:-,-, 


-,--,,--. ■: 


.,--,-,,:,■ ■ 


034336 
034 342 
034 346 


012 702 
004537 
000355 


000004 




^MOV 

"— --• ICQ 


•4,R2 

D ■v T K C HAP =~ 


~~i TRANSMIT 4 EXTRA CHARACTERS \q MQUl 


— — 


__ 


~~ *~'~' ' "'- 


7109 




:: — . _ 


~ 553 




V llJLF.R CHARACTER 


----- ™T=T 


--ji=.v.i.: 


:~rr:t-^~' 


7110 


034 350 


100010 




..: .„;-...!.. 


.:iNCT 6^11^56. !6. 


%m otcit or xmiiAL xmuQ 








7111 


054352 


077205 


— — 






Mfii^aiO^- - 






^^^-~ 




iii4 


■ "■- 


™=SUtt— - — = 


^«^= 
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TEST 2/ FIFO OVERRl»N INTEliRIH Tf ST 



SEQ 0184 



at;: 

7 J. i 5 
7114 
7 US 
71.16 

.' 11 ■' 
"116 

'119 



7120 
?121 
7122 
7 1 25 
7124 
712S 
7126 

7K?7 



'.'12fl 
712** 

7150 
7131 
7152 
715% 
7154 

715S 



7156 
7157 
7l5fl 
'154 
7140 

7141 



714.' 



714 5 
V 144 
714S 
7 146 
714/ 
7148 
7149 
7l r >0 
71M 
71S2 
7. IS 5 

7lb4 



0545 c >4 

054 560 
054 562 
054561 
054. r .6h 
0545/0 
0545 70 
054572 
0545 V 
054 5 74 

0545 76 
054402 
054404 
C54406 
054410 
0544 1, 1 
05441? 
544 14 
054414 
054416 

54420 
054424 
054426 
054450 
0544 52 
0.544 54 
054454 
0544 56 
0544 56 
054440 

054442 
054446 
054450 
0544 V 
054452 
0544S4 
0544S4 
054456 
054460 
054460 
054460 

054462 
0.54465 
054464 
5446S 
054 466 
05446/ 
0344 70 
054471 
0544/2 
0544 75 
054474 



004 S 5/ 010110 

000505 

OOOOOO 

100O00 
105003 

1044 60 

1044 10 
0OOO64 

00455/ 010110 

000074 

000000 

10OOOO 
105005 

104460 

104410 
0O0O4? 

00455/ 010110 

0O0125 

OOOOOO 

10OOO0 

105005 

104460 

104410 
000020 

00455 7 01153* 
OOOOU 

105005 

104460 

104410 
000002 



104401 

226 
226 
OOO 
%// 
125 
2*>2 
54/ 
50 
50 5 
0/4 
US 



END TST 



TXIUL4 



J'.H 


H5.RXCHAH 


50 3 




n 




NOCHDA 


1 


ore 


. ♦«. 


error 





JSR 

0/4 
O 

NOCRDA 
BCC 

error 

ESCAPE 



JSR 

125 



NOCROA 

HCC 

ERROR 

ESCAPE 



JSR 
ERROR 



(READ 6 CHK CHARACTER 



jNU INIT1AI CHffK Of RDA 
iflR I* NO ERROR 

,report stao'lo error 



ESCAPE T5T 



R5.RXCHAR 



iSKIP TO END UF TEST 



l READ el CHK CHARACTER 



TRAP 

TRAP 

.WORD 



I NO INITIAL CHECK Of RDA-0 
. ♦«. ;BR IF NO ERROR 

I REPORT 5 TACKED ERROR 

TST iSKIP TO END OF TEST 



R5.RXCHAR i* READ 6 CHK FINAL CHARACTER 

I * 

l* NO INI MAI CKCK OF ROA-O 
.♦8. i* BN IF NO ERROR 

(♦ REPORT STACKED ERROR 

TST »* SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



RS.ENOTRN 



ESCAPE TST 



(SHUT DOWN TRANSMITTER, RECEIVER 

j BR U NO ERROR 

i REPORT STACKED ERROR 

I SKIP TU END QF TtiiT 



TRAP 

TRAP 

.WORD 



L 100 '75; 



TRAP 



.BYTE 


SSb 


.nt Tf. 


226 


,Bt Te 


000 


.Bi ft 


5// 


.Bt TE 


12S 


.BYTE 


2V 


, B v 1 \ 


54/ 


.BYTE 


50 


» BY TF 


50 5 


.by n 


0/4 


.UYTE 


125 



CH hror 

CIE .CAPE 
L 1007? . 



CiEMRPR 

C$1 sCMPl 
L 100/5- . 



ClERROR 

CIESCAPE 
1.10075- . 



CI ERROR 

CIESCAPE 
1 1 00 / 5 . 



CtfcTST 



CNOMOAO DMVil I INI I'NM i)IA(,i MACRiT HI, '00 .V Mil H4 1'>:',1 PAGl 'V * 

Sl'G 01*S 
TEST .V f IKO OVERRUN INTEGRITY TEST 

'/ 1 c >'> 0344 75 000 1 V 1.N04 j . H M I 000 

71% *LVtN 

7ib 7 j •-«- 



I .J 
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7 177 .SBTTL 
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ShU 0X86 



TESJ 28 



BCP RX OVERRUN SET AND CLEAR TEST 



/1/8 

7179 



7180 

7181 
718P 
7183 
7184 
7185 
7186 

7187 



7188 
7189 
7190 
7191 
"U9P 
7193 
7194 
7195 
7196 
7197 
7198 
7199 
7200 
7201 
7202 



034476 

034476 
034476 
0344 76 
034500 

034 504 
034510 
034512 
034514 
034516 
034516 
034520 
034520 
034522 

034524 
034530 
034532 
034534 
034540 
034542 
034544 
034550 
034552 

034554 
034560 
034562 
034564 



104402 
004737 

004537 
043626 
000000 

103003 

104460 

104410 
000112 

004537 
000001 
000007 

004537 
OOOOOi 
000010 
004537 
000000 
000000 

004537 

000000 
103003 



TEST 28 -- BCP RX OVERRUN SET AND CLEAR TEST 
THE USYRT IS INITIALIZED AND THREE SUBTESTS ARE PERFORMED. 

1 - AN OVERRW CONOITION IS FORCED, RECEIVER STATUS REGISTER IS 

READ TWICE: ONCE TO VERIF* ROR BIT - 1, ANO AGAIN TO VERIFY 
THAT THE FIRST READ CLEARED ROR . 

2 -- AN OVERRUN CONOTTION IS FORCED (BY THE SAME TECHNIQUE USED IN 

(2), THE USVRT IS RESET AND THE PROPER STATE OF ALL REGISTERS 
IS VERIFIED. 

3 - AN OVERRUN CONDITION IS FORCED (AS ABOVE), RXE IS THEN DROPPED 

ANO A DELAY IS PROVIDED TO ALLOU TIME FOR THE FIFO TO FLUSH 
(CAUSED BY RDA GOING LOU). RXE IS THEN RE - INI T IALIZED ANO ROR 
IS CHECKED - 0, THE RECEIVER IS THEN RE -SYNCHED AND THE TEST IS 
TERMINATED. 

-.it********************************************-********,***,****************** 

?GNTST 



3+*+*++*+++++*+* SUBTEST 01 +*++*++++++++** 
BGNS'^ 



T28: ; 



005420 

007400 



JSR 



PC.INIDMV 



T28.1: 
llNIT DMV-11, ENTER M LOOP 



TRAP 



CJBSl^ 



JSR R5.INITRN jLOAD 1 SOU, CLK TX UNTIL ACTIVE 
DDCMPJNOCHK! SYNCH {SET DUCMP, NO ERR CHECKING. SYNCH-226 





BCC 

ERROR 



ESCAPE SUB 



01OO10 
010010 
010010 

006476 



JSR 

TSOM 

7, 

JSR 

TSOM 

8. 

JSR 

000 



JSR 


BCC 
ERROR 



R5.TXCTRL 
R5.TXCTRL 
H5.TXCTRL 

R5.CKR0R 
, »8. 



i USE 8 BIT CHARS 
j BR IF NO ERROR 
iREPORT STACKED ERROR 

I SKIP TO ENO OF TEST 



lOJlPUl 1ST SYNC CHARACTERS 

, OUTPUT 2N0 SYNC CHARACTER 

J 

i CLEAR TSOM 



i CHECK FOR RXOR • 

i BR IF NO ERROR 

i REPORT STACKEO ERROR 



TRAP 

TRAP 

.WORD 



CIEHROR 

CIESCAPE 
L 10075- . 



CNDMfAo 


0MV11 I. IN*. UNll 


OlAdl 


TEST 26 


- BCP 


RX OVERRUN SET f 




034564 


104460 




7203 


034566 








034566 


104410 






034570 


000044 




■;«?04 








/205 


0345 72 


004537 


011614 


"?06 


0345/6 


000116 




7 JO 7 








777:08 


034600 


004537 


006476 


7209 


034604 


000001 




7? 10 


034606 


103003 




7c' 11 


034610 








034610 


104460 




7212 


034612 








034612 


10*410 






034614 


0OC262 




7? 13 








7214 


034616 


004537 


0064 76 


7215 


034622 


OOOOOO 




7216 


034624 


103003 




7217 


034626 








034626 


104460 




7218 


034630 








034630 


104410 






034632 


00OO02 




7219 


034634 
034634 








034634 


104403 




7220 








7221 


034636 
034636 








034636 


104402 




7222 


034640 


004737 


005420 


7223 








7224 


034644 


004537 


007400 


7225 


034650 


043626 




7226 


034652 


COOOOO 




7227 


034654 


103003 




7228 


034656 








034656 


104460 




7229 


034660 








034660 


104410 






034662 


000054 




7230 








7231 


034664 


0O4537 


010010 


7232 


034670 


000001 




7233 


034672 


000007 




7234 


034674 


004537 


010010 


7235 


034700 


000001 




7236 


034702 


0OO010 




7237 


034704 


00453 7 


010010 


7238 


034710 


OOOOOO 




7239 


034712 


OOOOOO 




7240 


034714 


004537 


011614 


7241 


034720 


000116 




7242 








7343 


034722 


004537 


00^126 
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SEU 0187 



ESCAPE 


SUH 


JSR 

78. 


R5.STEPIU 


JSR 
1 

GCC 
ERROR 


R5.CKR0R 


ESCAPE 


TST 


JSR 


BCC 
ERROR 


R5.CKR0R 
.♦8. 


ESCAPE 


SUB 


ENOSUB 





j SKIP TO END OF TFST 



{FORCE RECEIVER OVERRUN 



j CHECK FOR RXOP • 1 

;BR IF NO ERROR 

j REPORT STACKED ERROR 

j SKIP TO END OF TEST 



{CHECK FOR RXOR - 

jBR U NO ERROR 

{REPORT STACKED ERROR 

{SKIP TO END 0^ lfcST 



TRAM 

TRAP 
. WORD 



TRAP 

TRAP 
.WORD 



j************'** SUT< TEST 0? *************** 
BCNSue 



1.10075: 



T28.2: 



TRAP 

TRAP 
.WORD 



TRAP 



JSR 


PC.INIDHV 


JSR 


R5.INITRN 


DDCMFJI 


NOCHK! SYNCH 







BCC 


.♦8. 


ERROR 




ESCAPE 


SUB 


JSR 


R5.TXCTRL 


TSOM 




7. 




JSR 


R5.TXCTRL 


TSOM 




8. 




JSR 


R5.TXCTRL 


000 









JSR 


R5.5TEPLU 


78. 




JSR 


R^.RSTCHK 



jINIT DMV-U, ENTER M-LOOP 

{LOAD 1 SOM. CLK TX UNTIL ACTIVE 
DCMP, NO ERR CHECKING, SYNCH-226 
i USE 8 BIT CHARS 
j BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 



TRAP 

TRAP 
. WORD 



{OUTPUT 1ST SYNC CHARACTER' 

i 

{OUTPUT 2ND SYNC CHARACTER 



iCLEAR TSOM 

i FORCE RECEIVER OVERRUN 

iRLStr UatRT/VtRIFY SAML 



CHRWUU 

C IF SCAPE 
1.10075 . 



CIERROR 

C5ESCAPE 
L100/4-. 



CiERROR 

ClESCAPt 

L 10075 . 



C$ESU6 



CJBSUB 



CJCRROR 

CIESCAPE 
UQQ76-* 



CNDMCAO 


DMVU I. 


INt UNTl 


DTAfU 


TEST 28 


BCP 


RX OVERRUN SFT / 


7244 


054726 


105005 




7245 


054 750 








054 750 


104460 




7246 


054 752 








054752 


104410 






054754 


000142 




7247 


054 756 
054 756 








054756 


104405 




V48 








7249 


054740 
054740 








054740 


104402 




7250 


054742 


004 757 


005420 


7251 








7252 


054 746 


004557 


007400 


7255 


054 752 


045626 




7254 


054754 


000000 




7255 


054756 


105005 




7256 


054760 








054760 


104460 




7257 


054 762 








054762 


104410 






054764 


000110 




7258 








7259 


054766 


004557 


010010 


7260 


054772 


000001 




7261 


054774 


000007 




7262 


054 7 76 


004557 


010010 


7265 


055002 


000001 




7264 


055004 


000010 




7265 


055006 


004557 


010010 


7266 


055012 


000000 




7267 


055014 


OOOOOO 




7268 


055016 


0O4557 


011614 


7269 


055022 


000116 




7270 








7271 


055024 


004557 


003754 


7272 


055050 


120000 




7275 


055052 


0OO042 




7274 








7275 


055054 


012701 


0OO050 


7276 


055040 


0O4757 


005512 


7277 


055044 


077105 




7278 








7279 


055046 


004557 


003754 


7280 


055052 


120000 




7281 


055054 


0O0142 




7282 








7285 


055056 


004557 


006476 


7284 


055062 


OOOOOO 




7285 


055064 


105005 




7286 


C55066 








055066 


104^60 




7287 


055070 








055070 


104410 






055072 


000002 
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BCC 
ERROR 



. *8. 
ESCAPE rsr 

f.ndsub 



} BR IF NO ERROR 
{REPORT STACKED ERROR 

j SKIP TO END OF' TEST 



*************** SUBTEST f>5 +** + ■**♦******** 
BGNSUB 



10* 



L 100 76 



T28.5? 



TRAP 

TRAP 
. WORD 



TRAP 



TRAP 



SFQ 0188 



CSERROR 

C IF SCAPE 
1. 100/4 . 



C5ESUH 



CSBSUH 



JSR 


PC.INIDMV 


I INT T DMV-11, ENTER M-LOOP 




JSR 


R5.INITRN 


jLOAD 1 SOM. CLK fX UNTIL ACTIVE 




DDCMP'NOCHK! SYNCH iSET DDCMP. NO ERR CHECKING, SYNCH-226 









{USE 8 BIT CHARS 




BCC 


.♦8. 


jBR IE NO ERROR 




ERROR 




jREPOR 1 STACKED ERROR 








TRAP 


CtERROR 


ESCAPE 


sue 


j SKIP Tl END OF TEST 








TRAP 


CJFSCAPF 






.WORD 


1.10077 . 


JSR 


R5.TXCTRL 


{OUTPUT 1ST SYNC CHARACTERS 




TSOM 

7. 

JSR 




• 




R5.TXCTRL 


; OUTPUT 2N0 SYNC CHARACTER 




TSOM 
8. 




l 




JSR 


R5.TXCTRL 


{CLEAR TSOM 




000 









JSR 


R5»STEPLU 


jFORCE RECEIVER OVERRUN 




78. 








JSR 


R5.WRITEI 


iDROP RECEIVER ENABLE CRXEN) 




VIAORB 




» CRDA SHOULD ALSO OR OF : , WHICH WILL 




TXEN'TTLOOP 


j CAUSE FIFO TO FLUSH ITSELF). 




MOV 


#50, Rl 


{DELAY FOR NW SEC, TO ALLOW FIFO TIME 




JSR 


PC.WAIT50 


j TO FLUSH ITSELF. 




SOB 


R1.10I 






JSR 


R5.WRITEI 


j TURN ON RECEIVER ENABLE (RXEN) 




VIAORB 








TXEN!RXEN!TTLO0P 






JSR 



BCC 


R5.CKR0R 


iVERIFY CLEARING OF RECEIVER OVERRUN 




. *8. 


j BR IF NO ERROR 




ERROR 




jREPORT STACKED ERROR 








TRAP 


C* ERROR 


ESCAPE 


sue 


iSKIP TC END OK TEST 








TRAP 


CJESCAPE 






.WORD 


LIQ077-. 



CNDMfAO OMVU I INK UN 11 D1A(,1 

TtSr 28 BCP RX OVERRUN 'Jbl AND CLhAR Tbbl 



MACRO Ml A>0 ,-V ■» 'HI 84 IS: SI PAlJt 93 3 



tQ 0169 



7288 055074 
035074 
035074 104403 

7289 035076 
0350/6 
03507b 104401 



ENOSUB 



ENDTST 



I. 10f./y : 



I 1 00 74 ; 



TRAP C*F',tJft 



TRAP CStT'j! 



CNDMCAO 


0MV11 LINE UN11 


TEST 29 


■ BCP RX SYNC 


7302 





7303 
7 304 
7305 
7306 
7307 
7308 
7309 
7310 

73U 



7312 
7313 
7314 
7315 
7316 
7317 
7316 
7319 
7320 
7321 
7 322 
7323 
7324 
7325 
7326 
7327 
7328 
7329 

7330 



7331 
7332 
7333 



035104 
035110 
035112 
035114 
035116 
035116 
035120 
035120 
035122 

035124 
035130 
035132 
035134 
035140 
035142 
055144 
035150 
035152 



035154 
035160 
035162 
035164 
035166 
035166 
035170 
035170 



035174 
035200 
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. SBTTL TES T 29 -- BCP RX SYNC CHARACTER RECOGNITION 



SCO 0190 



035100 

035100 004737 



004537 
043626 
040000 
103003 

104460 

104410 
000414 

004537 
000001 
000007 
004537 
000000 
000000 
004537 
120000 
000142 



004537 
OOOCOO 
000010 
103003 

104460 

104410 
000344 

004537 
000377 



005420 
007400 



010010 
010010 
00373* 



007676 



TEST 29 



BCP RX SYNC CHARACTER RECOGNITION 



THE FOLLOWING MESSAGE IS INITIATED WITHOUT ASSERTING RXE AND ONCE- 
THE DATA TS BEING TRANSMITTED, RXE IS ASSERTED CIE: *): 

SYNC ♦ SYNC DATA DATA DATA SYNC SYNC SYNC SYNC SYNC DATA DATA DATA 
SYNC SYNC DATA DATA DATA SYNC SYNC 

THE RECEIVER SHOULD IGNORE THE FIRST STRING OF DATA CHARACTERS. U"E 
THE NEXT TWO SYNC CHARACTERS FOR SYNCRONIZATION, THEN PASS THE REST 
OF THE MESSAGE (7 SYNC AND 6 DATA CHARACTERS) THROUGH RXDB REGISTER. 

BGNTST 

T29 ;: 

jINIT DMV-11, ENTER M-IOOP 

iLOAQ 1 SOU. CLK TX l^TIL ACTIVE 
;SET DDCMP,NO CHECK , SYNCH-226 
jUSE 8 BIT CHARS; LEAVE RXEN-0 
iBR IF NO ERROR 
;REPORT STACKED ERROR 



JSR 


PC, 


INIDMV 


JSR 


R5. 


INITRN 


DDCMP! 


NOCHK 


! SYNCH 


NORXEN 






BCC 


.♦8 


. 


ERROR 







ESCAPE TST 



JSR 

TSOM 

7. 

JSR 

000 



jSR 

VIAORB 

RXENJTXENJTTLOOP 



R5.TXCTRL 
R5.TXCTRL 
R5.WRITEI 



j SKIP TO END OF TEST 

jOUTPUT 1ST SYNC CHARACTER 
; (IGNORED BY RECEIVER) 

j CLEAR TSOM 

{ENABLE RECEIVER (RXEN -> 1) 



j THE RECEIVER SHOULD IGNORE THE NEXT STRING OF CHARACTERS 

j LOAD 000, TX 2N0 SYNCH 



007676 



JSR 

000 

8. 

BCC 

ERROR 

ESCAPE 



JSR 
377 



R5.TXCHAR 
. ♦S. 
TST 

R5,TXCHAR 



j BR IF NO ERROR 

, REPORT STACKED ERROR 

I SKIP TO END OF TEST 



jLOAO 377, TX 000 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
,UORO 



Ct ERROR 

CiESCAPE 
L 10100 -. 



CtFRROR 

CSESCAPE 
L10100-, 



CNDMCAO 

TEST 29 

7534 
7335 
7336 

7337 



7338 
7339 
7 340 
7341 
7342 
7343 

7344 



7345 
7346 
7347 
7348 
7349 
7350 

7351 



7352 
7353 
7354 
7355 
7356 

7357 



7 358 
7359 
7360 
7361 
7362 
7363 
7364 
7365 
7366 

7367 



7368 
7369 

7370 
7371 
7372 
7373 

7374 



DMVU LINE UNH 
■■ BCP RX SYNC 



J 1. 5 
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0IAG1 
CHARACTER RECOGNITION 



035202 
035204 
035206 
035206 
035210 
035210 
035212 

035214 
035220 
035222 
035224 
035226 
035226 
035230 
035230 
035232 

035234 
035240 
035242 
035244 
035246 
035246 
035250 
035250 
035252 

035254 
035260 
035262 
035264 
035264 
035266 
035266 
035270 



035272 
035276 
055300 
035302 
035304 
035304 
035306 
035306 
035310 

035312 
035316 
035320 
035322 
035324 
035324 
035326 



000010 
103003 

104460 

104410 
000324 

00453 7 
000125 
000010 
103003 

104460 

10*,4 10 
OOC304 

004537 
000226 
000010 
103003 

104460 

104410 
000264 

004537 
000000 
103003 

104460 

104410 
000246 



004537 
000226 
000010 
103003 

104460 

104410 
000226 

004537 
000226 
000010 
103005 

104400 



CO 76/6 



007676 



006176 



ft. 

BCC 


. *8. 


;BR ir NO ERROR 






ERROR 




;REP0R1 STACKED ERROR 


TRAP 


CiERROR 


ESCAPE 


TST 


j SKIP TO END Or TEST 


TRAP 
.WORD 


CIESCAPE 
1.10100- . 


JSR 


R5» TXCHAR 


{LOAD 125, TX 3// 






125 
8 










BCC 


,♦8. 


j BR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


CiERROR 


ESCAPE 


TST 


j SKIP TO END OF TEST 


TRAP 
.WORD 


CIESCAPE 
L10100-. 


JSR 


R5.TXCHAR 


{TX 125, LOAD SYNCH 






SYHOH 
8. 

BCC 










.♦8. 


j BR IF NO ERROR 






ERROR 




{REPORT STACKED ERROR 


TRAP 


CIERROR 


ESCAPE 


TST 


iSKIP TO END OF TEST 


TRAP 
.WORD 


CIESCAPE 
L10100-. 


JSR 


R5.CKRDA 


iCHECK RECEIVE DATA AVAILABLE 











{ (NO DATA EXPECTED") 






BCC 


,♦8. 


j BR IF NO ERROR 






ERROR 




j REPORT STACKED ERROR 


TRAP 


CIERROR 


ESCAPE 


TST 


{SKIP TO END OF TEST 







TRAP 
.WORD 



j THE RECEIVER SHOU_D SYNCHRONIZE ON THE NEXT TWO SYNC CHARACTERS 
i ANO THEN READ THE REMAINING ONES. 



007676 



l 



007676 



JSR R5.TXCHAR 

SYNCH 

8. 

BCC .♦a. 

ERROR 
ESCAPE TST 



JSR R5.TXCHAR 

SYNCH 

8. 

BCC . *8. 

ERROR 

ESCAPE TST 



{LOAD 2N0 SYNCH, TX 1ST SYNCH 



{BR IF NO ERROR 

, REPORT STACKED ERROR 

{SKIP TO END OF TEST 



iLOAD 3ND SYNCH, TX 2ND SYNCH 



{BR IF NO ERROR 
jREPORI STACKED ERROR 

I SKIP TO END OF TEST 



TRAP 

TRAP 
.WOP^ 



CIESCAPE 
L10100-. 



CIERROR 

CIESCAPE 
L10100- . 



SEQ 0191 



TRAP 



CIERROR 
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TEST 29 



7375 
7376 
7377 
7378 
7^79 
7580 

7381 



7 582 
7383 
7 384 
7385 
7386 
7387 

7388 



7389 
7390 
7391 
7392 
7393 

7394 



7395 
7396 
7397 
7398 
7399 
7400 
7401 

7402 



7403 
7404 
7405 
7406 
7407 
7408 
7409 
7410 
7411 
7412 

7413 



7414 



BCP RX SYNC CHARACTER RECOGNITION 



035326 
03f,330 

035332 
035336 
035340 
035342 
035344 
035344 
035346 
035346 
035350 

035352 
035356 
035360 
035362 
035364 
035364 
035366 
035366 
035370 

035372 
035376 
035400 
035402 
035402 
035404 
035404 
035406 

035410 
035414 
035416 
035420 
035422 
035424 
035424 
035426 
035426 
035430 

035432 
035436 
035442 

035450 
035454 
035456 
035460 
035462 
035462 
035464 
035464 
035466 



104410 
000206 

004537 007676 
000226 
000010 
103003 

104460 

104410 
000166 

004537 0076/6 
000226 
000000 
103003 

104460 

104410 
000146 

004537 011364 

000000 

103003 

104460 

104410 
000130 

004537 010110 
000226 
000000 
000010 

103003 

104460 

104410 
000106 



} 



012702 035540 

112237 035474 5$ 

116237 000001 035454 



004537 007676 
000000 
000000 
103003 

104460 

104410 
000050 



10$ 



J3R 

SYNCH 

8. 

BCC . *8. 

ERROR 

ESCAPE TST 



R5.TXCHAR 



JSR 

SYNCH 



BCC . *8, 

ERROR 

ESCAPE TST 



R5.TXCHAR 



JSR 


BCC 
ERROR 


R5.RCV1ST 


ESCAPE 


TST 


JSR 

SYNCH 



8. 

BCC 

ERROR 


R5.RXCHAR 
. »8. 


ESCAPE 


TST 



{LOAD 4TH SYNCH, TX 3RD SYNCH 



BR IF NO ERROR 

REPORT STACKED ERROR 

j SKIP TO END OF TEST 



{LOAD 5TH SYNCH 



;BR IF NO ERROR 

; REPORT STACKED ERROR 

j SKIP TO END OF TEST 



{CLOCK AND RECEIVE 3RD SYNCH 

;BR IF NO ERROR 
{REPORT STACKED ERRCR 

5 SKIP TO END OF TEST 



; RECEIVE/CHECK SYNCH CHARACTER 



»BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



MOV *TXTBL1,R2 

MOVB (R2)*,20$ 

MOVB 1CR2M0* 

JSR R5.TXCHAR 

000 



BCC . *8. 

ERROR 

ESCAPE TST 



{SET UP TABLE POINTER 
jSETUP EXPECTED CHARACTER 
{SETUP TRANSMIT CHARACTER 

{LOAD A CHARACTER 

)•* HOLE FOR NEXT TX CHARACTER 

{BR IF NO ERROR 

, REPORT STACKED ERROR 

I SKIP TO END OF TEST 



TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



C5ESCAPE 
L10100-. 



CIERROR 

CJESCAPE 
L10100-. 



CJERROR 

C1ESCAPE 
L10100-. 



C TERROR 

CiESCAPE 
L10100-. 



CJERROR 

CJESCAPE 
L10100-. 



CfERROR 

CiESCAPE 
L10100-. 



SEQ 0192 
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SECJ 0193 



7415 


035470 


004537 010110 


7416 


0354 74 


000000 


7417 


0354 76 


000000 


7418 


035500 


000010 


7419 


035502 


103003 


7420 


035504 






035504 


104460 


7421 


035506 






035506 


104410 




035510 


000026 


742? 






7423 


035512 


022702 035555 


742* 


035516 


001347 


7425 






7426 


035520 


004537 011532 


7427 


035524 


OOOOIO 


7428 


035526 


103003 


7429 


035530 






035530 


104460 


7430 


035532 






035532 


104410 




035534 


000002 


7431 






7432 


035536 
035536 






035536 


104401 


7433 






74 34 


035540 


226 


7435 


035541 


226 


7436 


035542 


000 


7437 


035543 


377 


7438 


035544 


125 


7439 


035545 


226 


7440 


035546 


226 


7441 


035547 


252 


7442 


035550 


101 


7443 


035551 


202 


7444 


035552 


226 


7445 


035553 


226 


7446 


035554 


000 


7447 


035555 


000 


7448 






7449 







20ij 



JSR 

000 



8. 

BCC 

ERROR 

ESCAPE 



CMP 
BNE 



R5.RXCHAR 

.♦8. 
1ST 



0TXEND1.R2 
5$ 



sCl.OCK/RfcCElVE/CHECK PREVIOUS CHARACTER 
i+* HOLE FOR EXPECTED CHARACTER 



;BR IF NO ERROR 

j REPORT STACKED ERROR 

I SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



C* ERROR 

CSESCAPE 
L 10100 -, 



JSR 
8. 

RCC 
ERROR 



R5.ENDTRN 
,♦8, 



ESCAPE TST 



jSHUT OOUN TRANSMITTER, RECEIVER 

5 BR IF NO ERROR 
{REPORT STACKED ERROR 

;SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



ENDTST 



L10100: 



TRAP 



CiERROR 

CJESCAPE 
L10100-. 



CJETST 



txTBLl: 


.BYTE 


226 


; SYNCH 




.BYTE 


226 


j SYNCH 




.RYTE 


000 






.BYTE 


377 






.BYTE 


125 






.BYTE 


226 


5 SYNCH 




.BYTE 


226 


; SYNCH 




.BYTE 


252 






.BYTE 


101 






.BYTE 


202 






.BYTE 


226 


1 SYNCH 




.BYTE 


226 


j SYNCH 




.BYTE 


000 




TXENDlt 


.BYTE 


000 




J 


.EVEN 
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SEQ 0194 



7465 
7466 
7467 
7468 
7469 
7470 
7471 

7472 



7473 
74 74 
7475 
7476 
7477 
74 78 
7479 
7480 
7481 
7482 
7483 
7484 
7485 
7486 
7487 
7488 
7489 
7490 

7491 



7492 
7493 



035556 
035556 

0355'- 2 

035566 
035570 
035572 
035574 
035574 
055576 
0.-J5576 
0-5600 

035602 
035606 
035610 
035612 
035616 
035620 
035622 
035626 
035630 



035632 
035636 

035640 
035642 
035644 
035644 
035646 
035646 
035650 



004737 

004537 
063626 
040000 
103003 

104460 

104410 
000474 

004537 
000001 
000007 
004537 
000000 
000000 
004537 
120000 
000142 



004537 
000000 
000010 
103003 

104460 

104410 
000424 



005420 
007400 



010010 
010010 
003734 



SBTTl. TEST 30 



BCP RX STRIP-SYNC TEST 



TEST 30 -- BCP RX STRIP SYNC TEST 



THE USYRT IS INITIALIZED WITH THE STRIP-SYNC CONTROL BIT ASSERTEO. 
THE EOLLOUING MESSAGE IS THEN INITIATED WITHOUT ASSERTING RXE AND 
ONCE THE DATA IS BEING TRANSMITTED, RXE IS ASSERTED (IE: *Or 

SYNC * SYNC DATA DATA DATA SYNC SYNC SYNC SYNC SYNC DATA ^ATA DATA 
SYNC SYNC DATA DATA DATA SYNC SYNC 

THE RECEIVER SHOULD IGNORE THE FIRST STRING OF DATA CHARACTERS, USE 
THE NEXT TWO SYNC CHARACTERS FOR SYNCRONIZATION, IGNORE THE NEXT 
THREE SYNC CHARACTERS, AND PASS THE REST OF THE MESSAGE C4 SYNC AND 
6 DATA CHARACTERS) THROUGH RXDB REGISTER. 

BGNTST 

JSR PC.INIDMV 



JSR R5.INITRN 

DDCMP ! STRIPS ! NUCHK ! SYNCH 

NORXEN 

BCC . »8. 

ERROR 



T30; : 
INIT DMV-11, ENTER M-LOOP 



LOAD 1 SOM, CLK IX LW.'ti. ACTIVE 

:SET DDCHP. NO CHECK. SYNCH«226 

USE 8 BIT CHARS; LEAVE RXEN-0 
{BR IF NO ERROR 
{REPORT STACKED ERROR 



ESCAPE TST 



JSR 

TSOM 

7. 

JSR 

000 



JSR 

VIAORB 

RXEN!TXEN!TTLOOP 



R5.TXCTRL 
R5.TXCTRL 
R5.URITEI 



j SKIP TO END OF TEST 

{OUTPUT 1ST SYNC CHARACTER 
j (IGNORED BY RECEIVER) 

jCLEAR TSOM 

{ENABLE RECEIVER CRXEN -> 1) 



007676 



THE RECEIVER SHOULD IGNORE THE NEXT STRING OF CHARACTERS 

jLOAD 000. TX 2ND SYNCH 



JSR 

000 

8. 

BCC 

ERROR 



R5.TXCHAR 
ESCAPE TST 



035652 004537 007676 



JSR 



R5.TXCHAR 



} BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OK TEST 



jLOAD 377, TX 000 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 

.WORD 



CSERROR 

CJESCAPE 
L10101-. 



CSERROR 

CJESCAPE 
L10101-. 



CNDMCAO DMV11 LINE UNIT 
TEST 30 - BCP RX STRIP 



DIAG1 
SYNC TEST 



N'i.5 
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7494 
7495 

7496 
7497 

7498 



7499 
7500 
7501 
7502 
7503 
7504 

7505 



7506 
7507 
7508 
7509 
7510 
7511 

751? 



751. 

7514 
7515 
7516 

7517 

7518 



7519 
7520 
7321 
7522 
7523 
7524 
7525 
7526 
7527 

7528 



7529 
7530 
7531 
.'532 
Vfi3? 
7S3A 



035656 
035660 
035662 
U35664 
035664 
035666 
035666 
035670 

035672 
035676 
035700 
035702 
035704 
035704 
0357C6 
035706 
035710 

035712 
035716 
035720 
035722 
035724 
035724 
035726 
035726 
S5730 

035732 
035736 
035740 
035742 
035742 
035744 
035744 
035746 



035750 
035754 
035756 
035760 
035762 
035762 
035764 
035764 
035766 

035770 
035774 
u3j'.'76 
0S6000 
r> 36002 
036002 



000377 
000010 
103003 

104460 

104410 
000404 

004537 
000125 
000010 
103003 

104460 

104410 
000364 

004537 
000226 
000010 
103003 

104460 

104410 
000344 

004537 
000000 
103003 

104460 

104410 
000326 



004537 
000226 
000010 
103003 

104460 

104410 
000306 

004537 
000226 
000010 
103003 

104460 



007676 



007676 



006176 



3 77 
8. 
BCC 
ERROR 


. *B. 


ESCAPE 


TST 


JSR 

125 

8. 

BCC 

ERROR 


R5.TXCHAR 
. *8, 


ESCAPE 


TST 


JSR 

SYNCH 

8. 

BCC 

ERROR 


R5.TXCHAR 


ESCAPE 


TST 


JSR 


BCC 
ERROR 


R5.CKRDA 

. »8. 


ESCAPE 


TST 



;BR IF NO ERROR 








{REPORT STACKED 


ERROR 










TRAP 


C$ERROR 


;SKIP TO END OF 


TEST 










TRAP 


CiESCAPl 






.WORD 


L10101-. 



{LOAD 125, TX 3 77 



j BR IF NO ERROR 

{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{LOAD SYNCH, TX 125 



;BR IF NO ERROR 
{REPORT STACKED ERROR 

;SKIP TO END OF TEST 



{CHECK RECEIVE DATA AVAILABLE 
: (NO DATA EXPECTED) 
jBR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TPAP 
, .ORD 



TRAP 

TRAP 
.WORD 



; THE RECEIVER SHOULD SYNCHRONIZE ON THE NEXT TUO SYNC CHARACTERS, 
s STRIP THE NEXT THREE, AND THEN READ THE REMAINING ONES. 



007676 



007676 



C $ ERROR 

CJESCAPE 
L10101-. 



CSERROR 

CSESCAPE 
L10101-. 



C TERROR 

CIESCAPE 
L10101-. 



JSR 

SYNCH 

8. 


R5.TXCHAR 


{LOAD 2ND SYNCH, TX 1ST SYNCH 






BCC 
ERROR 

ESCAPE 


.+8. 
TST 


;BR IF NO ERROR 
{REPORT STACKED ERROR 

j SKIP TO END OF TEST 


TRAP 

TRAP 
.WORD 


C $ ERROR 

OE SCAPE 
L10101-. 


JSR 

SYNCH 

8. 

BCC 

ERROR 


R5,TXCHAR 


{LOAD 3ND SYNCH, TX 2ND SYNCH 






.♦8* 


{RR IF NO ERROR 
iRERQRI STACKED ERROR 







SEG 0195 



TRAP 



C TERROR 



CNOMCAO 


DMVli I 


INI- UNH 
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A'd 


01% 




TtbT 30 


BCP 


RX ST'UP 


■i'ONC TEST 
















7535 


036004 
036004 
036006 


104410 
0O0?66 




ESCAPE 


TST 


j SKIP TO END Or TEST 


TRAP 
. WORD 


Cf ESCAPE 
L 10101 -. 






7536 






















7537 


036010 


004537 


007676 


JSR 


R5.TXCHAR 


I LOAD 4TH SYNCH, TX 3RD SYNCH 










7538 


036014 


000??6 




SYNCH 














7539 


036016 


OOOOIO 




8 . 




i 










"' >40 


036020 


103003 




HCC 


. »R. 


j MR IF NO F.RROR 










'541 


0360?? 
0360?? 


104460 




ERROR 




{REPORT STACKED ERROR 


TRAP 


CfFRRQR 






'54? 


0360?4 
0360?4 
0360?6 


104410 
0O0246 




ESCAPE 


rsT 


iSKIP TO END Of TEST 


TRAP 
.WORD 


C IE SCAPF 

1. 10101 . 






754 3 






















7544 


036030 


004537 


007676 


JSR 


R5.TXCHAR 


lLOAD 5TH SYNCH, TX 4TH SYNCH 










7545 


036034 


000?26 




SYNCH 














7546 


036036 


OOC010 




P. 




i 










754 7 


036040 


103003 




bcc 


. *8. 


jBR IF NO ERROR 










7548 


036O42 

05604? 


104460 




ERROR 




jREPORT STACKED ERROR 


TRAP 


C JERROR 






7549 


036044 
036044 
036046 


104410 
0O0??6 




F SCAPE 


TST 


iSKIP TO END Of TEST 


TRAP 
.WORD 


CJESCAPf 
L10101-. 






7550 






















7551 


036050 


004537 


007676 


JSR 


R5,T V CHAR 


jLOAD DATA1 ,TX 5TH SYNCH 










755? 


036054 


OOO?^? 




252 














7553 


036056 


OOOOIO 




8. 




i 










7554 


036060 


103003 




BCC 


. *8. 


,BR IF NO ERROR 










7555 


056062 
036062 


104460 




ERROR 




jREPORT STACKED ERROR 


TRAP 


CI ERROR 






7556 


036064 
036064 
036066 


104410 
0O0206 




ESCAPE 


TST 


iSKIP TO ENO OF TEST 


TRAP 
.WORD 


CIESCAPE 
LlOlOl- . 






7557 






















7558 


036070 


0O4537 


0076 76 


JSR 


R5.TXCHAR 


lLOAD DATA2 ,TX DATAl 










7 55*f 


036074 


000547 




~ 34 7 












- 


7560 


056076 


OOOOIO 




8. 




i 










7561 


036100 


103003 




.BCC 


. ♦e. 


iBR IF NO ERROR 








■ ~" 


756? 


036102 






ERROR 




iREPORT STACKED ERROR 












056102 


104460 










TRAP 


CIERROR 






7563 


036104 
036104 


104410 




ESCAPE 


TST 


i SKIP TO ENO OT TEST 


TRAP 


CIESCAPE 




■ •- r- 




036106 
036110 


000166 
0O4557 


007676 


JSR 


R5.TXCHAR 


j LOAD DATA3 


.WORD 


I 10101 . 






7564 




7565 






7566 


036114 


000030 




-030 










— =■- \ 


— ~- ~ ' ■ - 


7567 


036116 
036120 


000000 
103003 







. »8. 


^BR IF ,*0 ERROR 


■^^- 




.- --— •■ 


:■ I:-.-":--:- 


7568 






__._... 




m C 




• 


7569 


05612? 






..FRROR 




-*«RFP0RT STACKED ERROR - 













03612? 


104460 










TRAP 


CIERROR 







7570 


0361?4 






ESCAPE 


TST 


::~ iiSkip to end of test ..:.:: 


' 


" " 




" 




036124 
036i?6 


104410 
000146 




_ .~;';..; 


=*. 


SUSSSS- ,._!*.-_- 


—TRAP ; 


— CIESCAPf. «— 


= =si=±.-_: 


— -»."- 


75/1 


r— 'i ..•'-?•"•*.» 


T:^==~ ■■--.-.-.--= 


"L1Q1Q1-*. "" 


7======-^ 


gjfjsry^y- 


75 7? 


036130 


004537 


OU364 


JSR - 


— pS.RC^iiiF"^^ 


■ T -iClOCK ANO RECEIVE QAT/U 


"■ 


■ — - 


*" '" ~ " 


L......J- -..»«.■ V ..-W.P 


75 7 3 


036134 


OOOOOO 




O 


— 








■ ■■■ 







75/4 056156 


103005 


--==- == 


MLr^: 


~-^:-:-:~-:--r„-. 


I-^BR^IR'.^ 4MQR- - — - 


^-^- -— = 


r^BS 


== = ==-- 


— == = " 












•aa.Tas...... •-. -r..- r-^ 








■ '.at.? - -, -.«*,. ■-■.■.-.--,■■ ■■■■■ 


.: .V$.-1L.. 


^ — 
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. i r i 
95 5 



7575 


036140 








056140 


104460 




7576 


056 14. J 








05M4? 


1044 10 




'5 / ; 


056 144 


000130 




056146 


004557 


010110 


7 -;/9 


05615? 


000. '5? 




'530 


056 154 


C 30000 




'58 1 


056156 


000010 




'58? 


056160 


103005 




758 ^ 


056162 








05616? 


104460 




7S84 


056164 








056164 


104410 






056166 


000106 




7365 








7586 


0561/0 


012/02 


0*62/6 


758/ 


0561/4 


11223/ 


5625? 


7588 


056200 


116257 


000001 036212 


7589 








7590 


056206 


0O453 7 


007676 


7591 


05621? 


oooooo 




759? 


056214 


oooooo 




7593 


056216 


103005 




7594 


56220 








56220 


104460 




7595 


036222 








056222 


104410 






056224 


000050 




7596 








759/ 


056226 


0O4S3? 


010110 


7598 


056252 


OOOOOO 




7599 


056254 


OOOOOO 




7600 


036256 


0000 10 




7601 


56240 


105005 




7602 


056242 








05624? 


104460 




760', 


056244 








056244 


104410 






056246 


000026 




7604 








7605 


056250 


022/02 


036310 


7606 


056254 


0O154/ 




760 / 








7608 


056256 


0O4557 


01153* 


7609 


056262 


0O0010 




/MO 


056264 


103005 




/6 n 


056266 








056266 


104460 




761? 


0562 70 








0562/0 


104410 






0562/? 


00000? 




7613 


056274 
562 /4 
0362/4 


104401 





5$; 



101 



!0$: 



tNorsr 



ERROR 
ESCAPE 



J5R 

?5? 



8 . 

BCC 

ERROR 

ESCAPE 



MOV 

MOVB 

MOvB 

J5R 

000 



BCC 

ERROR 

ESCAPE 



JSH 
000 


a. 

BCC 
ERROR 

ESCAPE 



CMP 
BNE 



ISR 
ft, 
BCC 
ERROR 



TST 
Rli.RXCHAR 

TST 



<MXTBL?,R? 

(H21*.?0$ 

1(R2),10$ 

R5.TXCHAR 



♦ •8. 

TST 

W5.RXCHAR 

. *8. 

TST 



0TXEND2.R? 
5$ 



R5.ENDTRN 
.♦8, 



ESCAPE TST 



j RE PORT STACKED F RROR 
I SKIP TO END OF TEST 

j RECEIVE /CHECK DATA1 (2b?) 



j BR IF NO ERROR 
(REPORT STACKED ERROR 

I SKIP TO ENO OF TEST 



TRAP 



C* ERROR 



TRAP CI* '-CAPE 

.WORD L10101-. 



TRAP 

TRAP 
.WORD 



C* ERROR 

CSE SCAPE 

L10101 -. 



jSEl UP TABLE POINTER 

i SETUP EXPECTEO CHARACTER 

iSETUP TRANSMIT CHARACTER 

jlOAD A CHARACTER 

;♦♦ HOLE FOR NEXT TX CHARACTER 

jBR IE NO ERROR 

, REPORT STACKED ERROR 

jSKIP TO ENO OF TEST 



TRAP 

TRAP 

.WORD 



iCL.OCK/RECEIVE/CHECK PREVIOUS CHARACTER 
I** HOI.E FOR EXPECTED CHARACTER 



jBR IE NO ERROR 

t RE PORT STACKED ERROR 

I SKIP TO ENO OF TEST 



TRAP 

TRAP 
.WORD 



jSHUT DOWN TRANSMITTER, RECEIVER 

jBR IE NO ERROR 
jREPORT c TACKED ERROR 

i SKIP TU LNO UF TtST 



TRAP 

TRAP 
.WORD 



LiOlOl; 



CIERROR 

CIESCAPt 
L10101-. 



Cf ERROR 

C IE SCAPE 
L10101-. 



Vt>l4 



TRAP 



CI ERROR 

CtE SCAPE 

L 10101 . 



CStTST 



SEQ 0197 



CNDNfAO i)MVU 1 IN* I'M! UIACi MACRU Mh'OU ,V Ml] H4 IS: 31 PA(it 9S '1 

rtsi 50 ncr hx strip -s*nc rtsT 



SfcCl 0198 



761 6 
761? 

76 1H 

*6m 

'.>»?! 

7». t V 
>»/< 
*6 t "M 

76 /^ 



036? 7 6 

056P77 

056300 
056501 
03630v? 
056505 
056504 
05650S 
056506 
05650' 
036510 



54 < 
050 
«V6 
*V6 
2V 
101 
?0? 
C V6 
iV6 
000 
000 



TXTHLr* 



1 xr;ND.* 



. i 1 1 


54/ 


AMU. 


050 


.8 i U 


c^6 


.Hi Tt 


;^6 


.bvre. 


i.'5* 


.HV ft 


101 


.BYTF 


?0? 


.Br Tf 


t \?6 


.Br Tf 


.'.'6 


.Br If 


000 


.Hi It 


000 


.EVEN 





j')»NCH 
I SYNCH 



iMNCh 
j SYNCH 



b 



CNDMCAO [1MV11 I. INI UNI 1 1 Alii 
TEST 51 BCP RX LOST RXE TEST 

7655 
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.SBTTL Tf'jl 31 



BCP RX LOST RXE TEST 



sea oi w 



♦ ♦ 

* 

* 



*i********iA* ******* A 



TEST 31 -- BCP RX LOST RXE TEST 





03631? 




; 


7636 


036512 


004 757 


005420 


7637 








7638 


036316 


004537 


007400 


7639 


056322 


06S626 




7640 


056324 


000000 




7641 


036326 


103003 




7642 


036330 








036330 


104460 




764 3 


056332 








036332 


104410 






036334 


000334 




7644 








7645 


036336 


004537 


007676 


7646 


056542 


000226 




/64? 


036544 


000007 




7648 


056546 


103003 




7649 


056550 








056550 


104460 




7650 


056552 








056552 


104410 






056554 


000514 




7651 








7652 


056556 


004557 


010010 


7653 


056562 


OOOOOO 




7654 


056564 


000000 




7655 


056566 


004557 


007676 


7656 


056572 


OOOOOO 




765 7 


056574 


000010 




7658 


056576 


105005 




7659 


056400 








056400 


104460 




7660 


056402 








056402 


104410 






056404 


000264 




7661 








7662 


056406 


0O4557 


007676 


7663 


056412 


000125 




7664 


056*14 


000010 




7665 


056416 


103003 




7666 


056420 








056420 


104460 




7667 


056422 







♦ THE USYRT IS INITIALI7FD C CRC 16 , S TRIPS , BCP MODE) ^ND A MESSAGE IS STARTED. 

♦ WHILE IN THE MIDDLE OF TEXT, RXE IS DROPPED AND THE REACTION OF THE 

♦ RECEIVER IS MONITORED. 
}♦ 

BGNTST 

T31:: 

JSR PC.INIDMV iINIT DMV-11. ENTER M-LOOP 

JSR R5.INITRN ;L0AD 1 SOM, CLK TX UNTIL ACTIVE 

DDCMP* STRIPS! IDLES .'CRC16! SYNCH »SET DDCMP, STRIP, IDLE .CRC- 16, 5YNCH-226 





BCC 

ERROR 


.♦8. 


ESCAPE 


TST 


JSR 

SYNCH 
7. 

BCC 
ERROR 


R5.TXCHAR 
.♦8. 


ESCAPE 


TST 


JSR 

000 



JSR 

000 

8. 

BCC 

ERROR 


R5.TXCTRL 
R5.TXCHAR 
.♦8, 


ESCAPE 


TST 


JSR 

12b 

8. 

BCC 

ERROR 


R5.TXCHAR 
.♦8. 


ESCAPE 


TST 



j USE 3 BIT CHARS 






i BR IE NO ERROR 






jREPORT STACKED ERROR 








TRAP 


Ci ERROR 


iSKIP TO END OF TEST 








TRAP 


CIESCAPF 




.WORD 


L10102-, 



,L0AD 2N0 SYNCH, TX 1ST SYNCH 



j BR IE NO ERROR 
jREPORT STACKED ERROR 

jSKIP TO END OF TEST 



jCLEAR TSOM 

i LOAD 000, TX 2ND SYNCH 



j BR IF NO ERROR 

, REPORT STACKED ERROR 

j SKIP TO END OF TEST 



jLOAD 125. TX 000 



j BR IF NO ERROR 
jREPORT STACKED ERROR 

j SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



CSERROR 

CJESCAPE 
L1P102-. 



CfERROR 

OESCAPr 
L10102-. 



TRAP 



C TERROR 
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TEST 31 



OCP RX LOST RXE TEST 



SEQ 0200 



7668 
7669 
*6 70 
76 7 1 
".'6 72 
7r,73 

'to 74 



7675 
76 76 
76/7 
7678 
7679 
7680 

7681 



7682 
7683 
7684 
7685 
7686 
7687 

7688 



7689 

769v 
7691 
7692 
7693 

7694 



7695 
76% 
7697 
7698 
7699 
7700 
7 701 

7702 



7 703 
7 704 
7 705 
7 706 
7707 



036422 
036424 

036426 
0564 32 
0364 34 
036436 
036440 
036440 
036442 
036442 
036444 

036446 
036452 
036454 
0364 56 
036460 
036460 
036462 
036462 
036464 

036466 
0364 72 
036474 
036476 
036500 
036 500 
036502 
036 502 
036504 

036506 
036512 
036514 
036516 
036516 
036520 
036520 
036522 

036524 
036530 
036532 
036554 
036536 
036540 
036S40 
036542 
036542 
036544 



104410 
000244 

00453? 
000252 
000010 
103003 

104460 

104410 
000224 

00453/ 
0O0377 
0OO010 
103003 

104460 

104410 
000204 

0O4537 
OOOOOO 
000000 
103003 

104460 

104410 
000164 

004537 
OOOOOO 
103003 

104460 

104410 
0O0146 

0O4537 
OOOOOO 
OOOOOO 
000010 
103003 

104460 

104410 
000124 



TRAP 
.WORD 



CSESCAPE 
L 10102- . 



0076/6 



007676 



007676 



011364 



010110 



8. 

BCC 

FRROR 


R5.TXCHAR 


ESCAPE 


TST 


JSR 

377 

8. 

BCC 

FRROR 


R5.TXCHAR 
. *8. 


ESCAPE 


TST 


JSR 

OCO 



BCC 

ERROR 


R5.TXCHAR 
. *8. 


ESCAPE 


TST 


JSR 


BCC 
ERROR 


R5.RCVIST 
. »8. 


ESCAPE 


TST 


JSR 

000 



8. 

BCC 

ERROR 


R5.RXCHAR 


ESCAPE 


TST 



{LOAD 252, TX 125 



j BR U NO ERROR 
jRFPORT STACKED ERROR 

I SKIP TO END OF TEST 



{LOAD 377, TX 25? 



j BR IF NO ERROR 
{REPORT STACKFD FRROR 

j SKIP TO END OF TEST 



j LOAD 000 



;BR IF NO ERROR 
{REPORT STACKED ERROR 

j SKIP TO END OF TEST 



{CLOCK AND RCV 000 

i BR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



{READ C CHK 000, RCV 125 



iBR IF NO ERROR 
{REPORT STACKED ERROR 

{SKIP TO END OF TEST 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



TRAP 

TRAP 
.WORD 



036546 004W7 003476 



i TX AND RX NOW SYNC'D. ONE CHARACTER HAS BEEN READ/VERIFIED,, 
i NOW CLEAR RXEN (RECEIVER ENABLE). 

JSR R5.Rfc.AQ iRLAO VALUE OF VIAQRB REGISTER 



CI ERROR 

CiESCAPE 
L10102*. 



CSERRCR 

CtEbCAPE 
L 10102 -. 



C TERROR 

C$ESCAPE 
L10102- . 



C TERROR 

CIESCAPE 
L10102-. 



C TERROR 

CSFSCAPE 
L. 10102- . 



1 1 



CNDMCAO DMVll LINE UNH DIAGi MACRO M1200 



TEST 31 

7 708 
7 709 
7 710 
7711 



' :i3 

7 7 14 
'715 
7716 
7717 
7718 
7 719 
7 720 

7721 



7 722 
7723 
7 724 
7 725 
7 726 
7727 
7728 
7729 

7 730 



7731 
7 732 
7733 
7734 
7735 
7736 

7737 



7 738 

7 739 
7740 
7741 
7742 

7743 



7744 



BCP RX LOST RXf TEST 



036552 
036554 
036556 
036560 
036560 
036562 
036562 
036564 



120000 
036602 
103003 

104460 

104410 
000104 



036566 042 737 000100 036602 



0365 74 
036600 
036602 
0366O4 
0366O6 
036606 
036610 
036610 
036612 



036614 
036620 
036622 
036624 
036624 
036626 
036626 
036630 

036632 
036636 
036640 
036642 
036644 
036644 
036646 
036646 
036650 

036652 
036656 
036660 
036662 
036662 
036664 
056664 
036666 
0366 70 
0366 70 
036670 



004537 003734 
120000 
OOOOOO 
103003 

104460 

104410 
000056 



0O4537 
000104 
103003 

104460 

104410 
000040 

004537 
000303 
100010 
103003 

104460 

104410 
0OOO20 

0O4537 
000114 
103003 

104460 

104410 
000002 



104401 



CGORB : 



;.v n.u-84 
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VIAURB 
CGORB 
BCC 
ERROR 


. »H. 


ESCAPE 


TST 


BIC 


ORXEN, CGORB 


JSR 

VIAORB 
1: .WORD 
BCC 
ERROR 


R5.WRITEI 


.♦8. 



ESCAPE TST 



; AND PUT IT IN LOCATION PROVIDED 
j8E10W C CGORB). 
,BR U NO ERROR 
{REPORT ERROR 

TRAP 

TRAP 
.WORD 

{CLEAR RXEN BIT Of- ORB STATUS WORD 

jWRITc NEW STATUS WORD (W/RXEN-O) 

,BACK INTO VIAORB 

{ACTUAL DATA WRITTEN TO VIAORB 

,BR IE NO ERROR 

{REPORT ERROR 

TRAP 

TRAP 

.WORD 



005432 



RXEN NOW CLEARED CHECK USYRT 
CHECK USYRT STATUS AGAIN. 

JSR R5.CKUSTS 
TXACHTBMT 

BCC .♦«. 

ERROR 

ESCAPE TST 



STATUS, TX ANOTHER CHARACTER, AND 



007676 



005432 



ENQTST 



JSR R5.CKUS1S 
TXACTITSOJTBMT 
BCC .♦8. 
ERROR 

ESCAPE TST 



iCHK USYRT STATUS FOR PROPER STATE 
{TXACT • 1, TBMT « 1 
} BR IE NO ERROR 



TRAP 

TRAP 
.WORD 



;CHK USYRT STATUS FOR PROPER STATE 

{TXACT - L 

{BR IF NO ERROR 



L1010< 



TRAP 

TRAP 
.WORD 



TRAP 



C$ERROR 

C5ESCAPE 
I.10102-. 



C TERROR 

CJESCAPE 
L10102-. 



CiERROR 

CtESCAPE 
110102- . 



JSR R5.TXCHAR 


jLOAD/TRANSMIT 303 






303 








NCTBMU256. !8, 








BCC . *8. 


jBR IE NO ERROR 






ER^OR 


, REPORT STACKED ERROR 










TRAP 


CSERROR 


ESCAPE TST 


jSKIP TO END OF T<EST 










TRAP 


CIESCAPE 






.WORD 


L10102-. 



CiERROR 

CtESCAPE 

L10102 . 



CSETST 



SEQ 0201 



i b 



CNDMCAO OMV11 i INI UNI l UIAf.l MACRO M1200 ,V I I H 84 1S:31 PA(il 9/ 
HARDWARE PARAMETER CODING SECTION 



itQ 0*02 



7 74t> 
7 74 •• 
7748 
7749 
7 750 
7751 
7 752 
,' "5* 
*754 
755 
'756 
7 757 
7 758 
7 759 



7 760 
7 76 1 



7 76? 



7763 



7764 



7 765 



7 766 



7767 



0366 7? 
0366 72 
036674 

0366 74 
036674 
036676 
036 700 
036702 
036704 
036704 
036706 
036710 
03671? 
036714 
036714 
036716 
036720 
036722 
036724 
036 726 
036726 
036730 
036732 
036734 
036736 
036 740 
036740 
036742 
036744 
036746 
036750 
036752 
036752 
036754 
036756 
036760 
036762 
036764 
036764 
036766 
036770 
036772 
036V 74 



000041 



000031 
036776 
160020 
177776 

00*031 
037024 
000000 
0O0674 

002032 
037055 
00 7000 
000004 
000007 

003032 
037106 
000377 
000000 
000377 

004032 
037147 
000377 
000000 
000377 

005032 
037211 
000007 
000000 
000002 

00 7032 
037274 
0O0017 
000000 
000001 



SBTTL HARDWARE-: PARAMETER CODING SECTION 



////////////////////////////////////////////// '///////////,///////////////// 

/ THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 

/ THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 

/ MACROS ARE NOT EXECUTED AS MAOTNC INSTRUCTIONS BUT ARE 

/ INTERPRETED By THE SUPERVISOR AS DATA STRUCTURES. \Hi 

/ MACROS Al.lOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 

/ WITH THE OPERATOR. 



BGNHRD 



GPRMA ADORES , 0,0, 160020 , 177776 , YES 



GPRMA VECTOR, 2, 0,0,674, YES 



GPRI1D PRIRTY,4,0,7000,4,7,YE5 



.WORD L1O103-LIHARD/2 



G c RM0 SW1.M, 6, 0,377, 0,377, YES 



GPRMO 



SW2.M, 10,0, 377,0, 377, YES 



GPRMO B0TY.M.12,0,7,0,2,YES 



GPRMO BR.M, 16,0, 17,0.1, YES 



L SHARD: : 




.WORD 


TlCODF 


.WORD 


ADDRES 


.WORD 


TILOLIM 


.i:ord 


TIHILIM 


.WORD 


TlCODE 


.WORD 


VECTOR 


.WORD 


TILOLIM 


WORD 


TIHILIM 


.WORD 


TICOOE 


.WORD 


PRIRTY 


.WORD 


7000 


.WORD 


TILOLIM 


.WORD 


TIHILIM 


.WORD 


TICOOE 


.WORD 


SW1.M 


.WORD 


377 


.WORD 


TILOLIM 


.WORD 


TJHILIM 


.WORD 


TICOOE 


.WORD 


SW2.M 


.WORD 


377 


.WORD 


TILOLIM 


.WORD 


TIHILIM 


.WORD 


T ICODE 


.WORD 


BDTY.M 


.WORD 


7 


.WORD 


TILOLIM 


.WORD 


TIHILIM 


.WORD 


TICOOE 


.WORD 


BR.M 


, WORD 


17 


,WORO 


TILOL IM 


,WORD 


TIHILIM 



f u.. 
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HARDWARE PARAMETER CODING SECTION 



SEQ 0203 



/ 768 












//(/J 036 Hi, 










LNUHRD 


036/76 












■V70 












77/1 








.NLIST 


BEX 


?".'72 036 7 76 


504 


105 


126 


ADORES: 


.ASCIZ 


7 7/3 03 7024 


104 


105 


126 


VECTOR; 


.ASCI/ 


; 7 74 037055 


104 


105 


126 


PRIRTY: 


.A3C.U 


"775 03/106 


123 


127 


111 


SWIM: 


.fcSCIZ 


; 776 037147 


123 


12 7 


111 


5W2.M: 


ASCI/ 


77 7 7 03 7211 


102 


117 


101 


BDTY.M; 


.~SCI/ 


n ;a 03/2/4 


102 


101 


125 


BR.M: 


.ASCI/ 


7 7 79 








.LIST 


BEX 


7 780 








.EVEN 





L10103; 



.EVEN 



CSR ADDRESS ; / 
VECTOR ADDRESS 
PRIORITY LEVEL 



/DEVICE 

/DEVICE 

/DEVICE 

/SWITCH PACK 9 1 

/SUITCH PACK 2 CDDCMP ADDRESS): 

/BOARD TYPE (0-M8064, 1-M8053-V.3 

/BAUD RATE (0-LOW U9.2K), I -HIGH 



(BOOT ADDRESS.) 



/ 



1. 2*M8053-EIA) 
(56IO): / 



. 1 1. b 
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SEQ 0*04 
SOFTWARE PARAMETER COOING SECTION 

7782 .SBTTL SOFTWARE PARAMETER CODING SECTION 

7783 

7 784 

778*. j //////////////////////////////////////// /////////////////////////////// 

7786 ;, THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS 

7787 ;/ THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 
7 788 ;/ MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 

7789 5/ INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THF 

7790 ;/ MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
7 791 ;/ WITH THE OPERATOR. 

7 79? \/////////////////////////////////////////////////.'///////////////// / / 

7793 

7794 037546 BGNSFT 

037*46 000000 .WORD L10104 -L55UFT/2 

037350 L*SOFT:: 

7796 037350 ENDSFT 

.EVEN 
037350 L10104: 



K[.b 

CNOMCAO DMVll LINE UNIT UIAG1 MACRO M1200 ,'V FEB 84 15:31 PAGE 99 
****** PATCH AREA FOR DEBUG ****** 

. SBTTL ****** PATCH AREA FOR DEBUG ****** 

PATCH: 



st a oaoo 



7 798 
7799 

78v,C 037350 

7801 03 7450 

78G2 0374j> 000240 

f803 037452 0^0240 

7804 037454 0002^0 

7805 

^806 

7807 

7808 

780^ 037456 

7810 

78U 

7012 037456 



. •. ♦ lOO 
NOP 
NOP 
NOP 

; + *«***************#««* + ** + ******4>* 

.SBTTL "BNDMOD** STATEMENT 



7813 
7814 



037456 OOCOOO 
03 7460 000000 
037462 

000001 



. SBTTL 

I $LAST: : 
.£NU 



"LASTAO" STATEMENT 6 END OF PROGRAM 
LASTAD 



EVEN 

WORD 
WORD 



CNDMCAO OMV11 LINE UNIT DIAG1 
SYMBOL TABLE 



ABC 

ADDRES 

ADR 

AD, HIT 

AD . OK 

APA 

APAD 

ASSEriB 

BADDAT 

BDATA 

BORATE 

BDTY.M 

BITO 

BIIOO 

BITOl 

BIT02 

BIT03 

BIT04 

BIT05 

BIT06 

BIT07 

Biroe 

BIT09 

BIT1 

BITIO 

BIT11 

BIT12 

BIT13 

BIT14 

BIT15 

BIT2 

BIT3 

BIT4 

BIT5 

BIT6 

BIT7 

BITS 

BIT9 

boe 

BRDTYP 

BR.M 

BSELO 

BSEL1 

BSELIO 

BSELll 

BSEL12 

BSEL13 

BSEL14 

BSEL15 

BSEL16 

BSEL17 

BSEL2 

BSEL3 

BSE' 4 

BSEL5 

BSEL6 

8SEU7 



000160 

0367 76 

000020 G 

021566 

021562 

000200 

100000 

000010 

002442 

002402 

002550 

037211 

000001 G 

000001 

000002 

000004 

00O010 

000020 

000040 

0O0100 

000200 

000400 

001000 

000002 

002000 

004000 

010000 

020000 

040000 

100000 

000004 

000010 

000020 

0OO040 

000100 

000200 

000400 

001 coo 

000400 
002544 
037274 
0024 72 
002474 
002512 
002514 
002516 
002520 
002522 
002524 
002526 
002530 
0024 76 
002500 
002502 
002504 
002506 
002510 



0IAG1 


MACRO M1200 


22 EFB-84 


1 
15:31 PAGE 


. Lb 

99-1 




BSRO 


002256 


C$ESU6- 


000003 


LM3 


013211 


BSR1 


002260 


C$ETST« 


000001 


EM30 


013535 


B5R10 


002276 


CtEXIT- 


000032 


EM T 


013556 


BSR11 


002300 


C*GETB« 


000026 


EM 


013573 


BSR12 


002302 


C*GETU« 


000027 


tt 


013621 


BSR13 


002304 


C*GMAN« 


000043 


EM36 


013642 


BSR14 


002306 


C$GPHR> 


000042 


EM39 


013657 


B5R15 


002310 


CftGPLO' 


000030 


EM4 


013235 


BSR16 


002312 


CIGPRI- 


000040 


EM40 


013701 


BSR17 


002314 


C$INIT« 


000011 


EM5 


013252 


B5R2 


002262 


C*INLP- 


000020 


EM54 


013717 


BSR3 


002264 


CIMANI- 


000050 


EM6 


013302 


B5R4 


002266 


CIMEM • 


• 000031 


EM66 


013741 


BSR5 


002270 


CIMSG ' 


000023 


EM68 


013760 


BSR6 


002272 


C*0PEN« 


000034 


EM69 


014007 


BSR7 


002274 


CIPNTB' 


- 0U0014 


EM70 


014025 


CARIER- 


000100 


C*PNTF« 


• 0000? 7 


EM71 


014047 


CA1CTL- 


000001 


CiPNTS' 


■ 000016 


EM72 


014065 


CA2CTL- 


000016 


c$pnt>:« 


- 000015 


EM73 


014107 


CB1CTL- 


000020 


CiQIO ■ 


■ 00037 7 


EM74 


014124 


CB2CTL- 


000340 


CIROBU- 


• 000007 


EM75 


014145 


CGORB 


036602 


CIREFG- 


■ 00004 7 


EM76 


014161 


CHKTSO 


007116 


CIRESE' 


• 000033 


EM77 


014201 


CHPTYP 


002454 


CtREVI- 


. 000003 


EM78 


014215 


CKRACT 


005676 


CiRFLA 


• 000021 


EM90 


014235 


CKRDA 


006176 


CIRPT • 


■ 000025 


EM91 


014266 


CKROR 


0064 76 


CISEFG" 


■ 000046 


EM92 


014323 


CKRSA 


006336 


OSPRI' 


• 000041 


EM96 


014357 


CKSE9M 


006636 


C$SVEC 


■ 000037 


EM99 


014404 


CKTACT 


005536 


C$TPRI« 


■ 000013 


ENDEMB 


011640 


CKTBMT 


006036 


DOCMP ■ 


■ 040000 


ENOIT 


021446 


CKUSTS 


005432 


DEVMAP 


002460 


ENOPAT 


0O31C5 


CRC16 • 


• 001400 


DEVPTR 


002462 


ENOTRN 


011532 


CTS 


. 000010 


DFPTBL 


002224 G 


ERRBLK 


002254 G 


C5AU « 


» 000052 


DIAGMC 


■ OOOOOO 


ERRFL^ 


002424 


CIAUTO- 


■ 000061 


DOTBMT' 


■ 000007 


ERRh^G 


002252 G 


CiBRK - 


' 000022 


DTR 


• 000020 


ERRNBR 


002250 G 


CIBSEG" 


• 000004 


DTRL « 


• OOOOOO 


ERR0R1 


002452 


CI6SUB* 


■ 000002 


D.BUG 


• OOOOOO 


ERRTYP 


002246 G 


C$CEFG' 


■ 000045 


EF.CON 


• 000036 G 


ERR10 


017372 G 


CICLCK- 


• 0OOO62 


ef.neu 


• 000035 G 


ERR 11 


017546 G 


CiCLEA* 


• 000012 


EF.PWR 


« 000034 G 


ERR11* 


020356 


C$CL0S- 


• 000035 


EF.RES 


• 0O0037 G 


ERR12 


017722 G 


CfCLPl" 


• 000006 


EF.STA 


■ 000040 G 


ERR12* 


020710 


C*CVEC« 


• 000036 


EIAV35 


- 000002 


ERR13 


020036 G 


CIDCLN- 


• 000044 


EMI 


013103 


ERR4 


017030 G 


CIDOOU- 


• 000051 


EM100 


014425 


ERR5 


017154 G 


C*DRPT« 


• 000024 


EM101 


014445 


ERR5* 


020160 


CIDU ■ 


• 0OO053 


EM102 


014471 


ERR7A 


017252 G 


CIEDIT« 


• 000003 


EM14 


013332 


EVL 


000004 G 


CIERDF- 


■ 000055 


EM16 


013346 


EVRC - 


002400 


C$ERHR- 


■ 0OOO56 


EM2 


013142 


EXADD - 


000020 


CiERRO- 


• 000060 


EM25 


013366 


EXCON - 


000010 


C$ERSE« 


■ 000054 


EM26 


013414 


EXECUT- 


000005 


CJERSO' 


■ 00005 7 


EM27 


013446 


E1EN0 • 


002100 


CiESCA. 


• 000010 


EM28 


013477 


E$LOAD- 


000035 


UESE6' 


• 000005 


EM29 


015520 


FLfiCAl- 


000002 



SEQ 0206 



I 1.GCA2 

f 1 GCB1-* 

Ft GCB2- 

FLl.IRQ- 

F'LGSR - 

FLGT1 * 

FLGT2 * 

EMTIO 

FMT10A 

EMT 11 

FMT15 

FMU5A 

FMT19 

KMT2 

FMT21 

FMT22 

FMT23 

FMT24 

FMT25 

KMT26 

FMT27 

FMT29 

FMT3 

FMT30 

FMT31 

FMT32 

FMT4 

FMT4A 

FMT4B 

FMT4C 

FMT5 

FMT5A 

FRSTIM 

F*AU 

FIAUTO 

FiBGN 

FICLEA 

F*DU 

F*ENO 

F$HARD 

FiHW 

F$INIT 

F$JMP 

FtMOD 

F*hSG 

F$PROT 

FtPWR 

F$RPT 

FJSEG 

FiSOFT 

FtSRV 

F$SU8 

F$SW 

FtTEST 

GDATA 

GETBSR 

GETPRM 



000001 
000020 
000010 
000200 
000004 
000100 
000040 
012252 
012326 
012347 
01236b 
012420 
012472 
011650 
012523 
012533 
012555 
012634 
012647 
012677 
012732 
012741 
011705 
012746 
013003 
013051 
011771 
012027 
012062 
012067 
012122 
012165 
002444 
000015 
000020 
000040 
000007 
000016 
000041 
000004 
C00013 
000006 
000050 
OOOOOO 
000011 
000021 
000017 
000012 
0OOO03 
000005 
000010 
000002 
000014 
0OOO01 
002400 
004046 
021512 



\A 
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SEQ < 



GF.TVRS 

GET'USR 

GOODAT 

GJCNTO* 

GSDELM- 

G*DISP> 

GSEXCP- 

G*HILI» 

G$LOLI- 

G$NO - 

G$OFFS* 

GSOFST- 

G$PRMA- 

G$PRMO» 

G$PRML« 

G$RADA« 

GiRADB* 

G*RADD» 

G$RADL« 

G*RADO« 

G*XFER« 

G$YES = 

HOX 

HELP * 

HOE 

IBE 

IDLE = 

IDLES « 

IOU 

IEI 

IEO 

TER 

INIDMV 

INrTRN 

INITT1 

INITT2 

INTFLG 

INTGRL 

INTSC 

ISR 

IXE 

I*AU 

I$AUTO 

I*CLN 

I$DU 

IiHRD 

I UNIT 

IthOO 

I*MSG 

I$PROT 

IiPTAB 

I5PWR 

I$RPT 

ItSEG 

IJSETU 

I$SFT 



004402 
004502 
004210 
002440 
000200 
000572 
000003 
000400 
000002 
000001 
000000 
000400 
00037G 
000001 
000002 
000000 
000140 
000000 
000040 
000120 
000020 
000004 
000010 
000004 
000000 
100000 
010000 
000010 
004000 
000040 
OCOOOl 
000020 
020000 
005420 
007400 
004556 
004756 
002422 
000001 
OO020O 
OO010O 
004000 
000041 
000041 
000041 
000041 
000041 
000041 
000041 
000041 
000040 
000041 
00004 1 
000041 
00004 1 
000041 
000041 



I*SRV * 

ISSUB ' 

I$TST » 

J$JMP • 

LOADAT 

LOE 

LOGDEV 

LOT 

LUSWI1 

LUSWI2 

LU1M0D 

L*ACP 

L$APT 

L*AU 

LSAUT 

LSAUTO 

L*CCP 

I $CLEA 

L$CO 

LJDEPO 

L*DESC 

LJDESP 

L*DEVP 

LJDISP 

LJDLY 

L$DfP 

LfDTYP 

LiDU 

LtDUT 

LtDVTY 

LiEF 

LiENVI 

LfERRT 

LiETP 

LIEXP1 

L*EXP4 

L*EXP5 

L *HARD 

L$HIME 

LiHPCP 

L*HPTP 

LiHU 

L$ICP 

LIINIT 

LILAOP 

LILAST 

L$LOAD 

L*LLN 

LIMREV 

LINAME 

LIPRIO 

LIPROT 

L*PRT 

L*REPP 

L$RfcV 

LiSOFT 

L$$PC 



000041 

00004 1 

000041 

000167 

002436 

040000 

002410 

000010 

002540 

002542 

002000 

002110 

002036 

021602 

002070 

021450 

002106 

021574 G 

002032 G 

002011 

003326 

002076 

002060 

002124 

002116 G 

002040 G 

002034 G 

021576 

002072 

003306 

002052 

002044 

002246 

002102 

002046 G 

002064 G 

002066 

036674 

002120 

002016 

002022 

002224 

002104 

021100 G 

002026 G 

037462 G 

002100 G 

0C2074 G 

002050 G 

002000 

002042 

021072 G 

002112 G 

002062 

002010 

037350 

002056 



G 
G 
G 
G 
G 
G 
G 



G 
G 
G 
G 
G 
G 
G 



G 
G 



L$SPCP 
LJSPTP 
L$STA 
L$SW 
LATEST 
L$TIML 
L$UNIT 
L 10000 
L 10001 
L 10002 
L 10003 
L 10004 
L 10005 
LI 0006 
L 10007 
L10010 
L10012 
L 1001 3 
L10014 
L10015 
L10016 
L10017 
L 10020 
L 10021 
L 10022 
L 10023 
L 10024 
L 10025 
L 10026 
L10027 
L10030 
L10031 
L 10032 
L10033 
L 10034 
L10O35 
L10036 
L10037 
L 10040 
L 10041 
L 10042 
L10O43 
L10044 
L10O45 
L 10046 
L 1004 7 
L10050 
L 10051 
L1C052 
L 10053 
L 10054 
L 10055 
L 10056 
L10057 
L 10060 
L 10061 
L10062 



002020 
002024 
002030 
002246 
002114 
002014 
002012 
002244 
002246 
017152 
017250 
017370 
017544 

017YcG 
020034 
020132 
021446 
021564 
021574 
021600 
021602 
021762 
022150 
022046 
022146 
022342 
022400 
023146 
023232 
023456 
023550 
023S44 
023642 
023636 
023734 
023730 
024064 
024060 
024156 
024152 
024232 
024306 
024630 
024 762 
025144 
025652 
026252 
026460 
026722 
027434 
027112 
027262 
027432 
027642 
030036 
,030232 
Q3Q&10 



G 
G 
G 
G 
G 
G 
G 



L10063 

L 10064 

L 10065 

L 10066 

L10067 

L10070 

L100/1 

1.10072 

1.10073 

L10074 

L10075 

L10076 

L10077 

L10100 

L10101 

1.10102 

L10103 

L10104 

MCLR 

MOMRDY 

MLWRI 

MPCSR 

MPIVEC 

MPOVEC 

MPRIOR 

MRDY 

MRF.Q 

MSTCLR 

NCR ACT 

NCTOMT 

NEWLIN 

NEWST 

NFCRDA 

NOCHK 

NOCRDA 

NOLOOP 

NORXEN 

NULCLK 

OVRC 

0*APTS 

OfAU 

OiBGNR 

OiBGNS 

0*DU 

OIERRT 

OIGNSW 

OJPOIN 

OISETU 

PALEN6 

PATCH 

PATE 

PATF 

PATG 

PATH 

PATI 

PATJ 

PATK 



033522 
031202 
031570 
032156 
032544 
033132 
033520 
054110 
034460 
035076 
034634 
034736 
035074 
035536 
036274 
036670 
036776 
037350 
000100 
000040 
003744 
0024 72 
002532 
002534 
002536 
000200 
OOOOC 1 
003374 
020000 
000200 
011645 
021272 
040000 
003400 
100000 
001000 
040000 
000200 
002000 
000000 
000001 
000000 
000000 
000001 
000001 
000000 
000001 

ooocoo 

000001 
037350 
002652 
002662 
0026 ??. 
002721 
002752 
003013 
003023 



PATL 


003044 




PATQ 


003065 




PATQB 


003075 




PBLENB- 


000002 




PCR 


120407 




PCSARH- 


120405 




PCSARL- 


120404 




PNT 


001000 


G 


PRESET- 


000001 




PRI 


002000 


G 


PRIOR 


002416 




PR1RTY 


037055 




PRIOO - 


000000 


G 


PRI01 « 


000040 


G 


PRI02 - 


000100 


G 


PRI03 - 


000140 


G 


PRI04 - 


000200 


G 


PRI05 » 


000240 


G 


PRI06 * 


000300 


G 


PR 107 - 


000340 


G 


PROTO - 


000100 




PSTACK 


C02414 




RABGA - 


000004 




RAMADR* 


001000 




RCVBUF 


003106 




RCVOAT- 


000002 




RCV1ST 


011364 




RDA 


000200 




RD5RH - 


120401 




RDSRL - 


120400 




READ 


003476 




READI 


003610 




REDBYT 


002432 




REOOAT 


002572 




REDLOC- 


000001 




REDPAG- 


000003 




REGNUM 


002412 




REGO 


002602 




REG1 


002604 




REG2 


002606 




REG3 


002610 




REG4 


002612 




REGS 


002614 




REG6 


002 6 16 




REG7 


002e».'0 




REOM - 


000002 




RERCHK- 


000001 




RERR - 


000200 




RETPDR 


002430 




rin; - 


000200 




ROR 


000010 




R5A 


000020 




RSOM =■ 


000001 




RSTCHK 


00512b 




RTSND - 


000010 




RUN 


000200 




RXABGA* 


002000 





CNDMCAO DMV11 LINE U 



HI 
CI 
Dl 
El 
F~l 
Gl 
HI 
II 
Jl 
Kl 
LI 
Ml 
Nl 



BS 
Cb 

05 
F5 
F5 
G5 
H5 
15 
J5 
1<5 
L5 
M5 
N5 



B9 
C9 
D9 

E9 
F9 
G9 
H9 
19 
J9 
l<9 
L9 
H9 
N9 



B15 

CI 5 

nis 

E13 

r,u 

H13 

1 1 5 

J13 

/:* 
i :*> 

Ml* 

Nl? 



B2 
C? 
02 
E2 
F2 
G2 
H2 
12 
J2 
K2 
L2 
M2 
N2 



B6 
C6 
D6 
Eb 

re 

G6 
H6 
16 
J6 
K6 
1.6 
H6 
N6 



BIO 
CIO 
D10 
E10 
F10 
G10 
H10 
110 
J10 
K10 
L10 
H10 
NIC 



B14 
C14 
D14 
E14 
F14 
G14 
H14 
114 
J14 
K14 
L14 
M14 
N14 



83 
C3 
03 
E3 
F3 
GS 
H3 
13 
.13 
K' 
L3 
M3 
N3 



B7 
C7 
D7 

E7 
F7 

G7 
H7 
17 
J7 
K7 
LI 
M7 
N7 



Bll 
CM 
Dll 
Ell 
Fll 
Gil 
Hll 
111 
Jll 
Kll 
LU 
Mil 
.Nil 



B15 
CIS 
01*3 
clS 

ri5 
G15 

HIS 
115 
J15 
K15 
115 
Mlb 
Nib 



B4 

C4 
D4 
E4 
F4 
G4 
H4 

,14 
J4 
K4 

,1.4 
M4 

,N4 



B8 
C8 
D8 
E8 
F8 
G8 
H8 
18 
J8 
K8 
L8 
M8 
N8 



B12 

C12 
012 
E12 
F12 
G12 
H12 
112 
J12 
K12 
L12 
M12 
N12 



916 

C16 

.Dlb 

Elb 

Tlr> 

.G16 

Hit-. 

Ilo 

Jib 

Klb 
M16 
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TGA 
TIMFLG 

TM 
TMPO 

TMP1 
TMP2 
TMP3 
TMP4 
TMP5 

TMP7 

TSO 

TSOM ■ 

TSTCON 

TSTNUH 

TTLOOP- 

TXAB ■ 

TXACT • 

TXCMAK 

TXCTRL 

TXDL « 

TXEN • 

TXEND1 

TXEND2 

TXEND3 

TXEhC4 

TXEOH ■ 

TXERR ■ 

TXGA ■ 

TXSOri - 

TXTBL1 

TXTBL2 

TXTBLJ 

TXTBL4 

TXTMLT 

TXTMLO 

TXTML1 

TXTML2 

TXTHL3 

TXTML4 

TXTML5 

TXTMU6 

TXTML7 

TXTNP 

TXTNPT 

WNPO 

TXTNP1 

TXTNP2 

TXTNPT 

TXTNP4 

TXTNP5 

TXTNP6 

TXT*>7 

TXTNP8 

TXTMU. 

TxTUR 

TXTURT 
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RXACT • 


000040 


RXCHAR 


010110 


RXDL « 


000007 


RXEN - 


000100 


R/<EOH » 


001000 


RXERR * 


100000 


RXOR - 


0O40O0 


RX50M « 


000400 


SAVE4 


002446 


SAVE6 


002450 


SAVLEN 


002456 


SCRACH 


002406 


SECAD - 


000020 


SEC ADR- 


010000 


SELO 


0024 72 


SEL10 


002512 


SEL12 


002516 


SEL14 


002522 


SEL16 


002526 


5EL2 


002476 


SEL4 


002502 


SEL6 


002506 


SERIAL 


007256 


SEWIA 


005326 


SFPTBL 


002246 G 


SFR 


000001 


SPEED - 


000020 


SRtlOOE- 


000034 


STALL 


004400 


STARES 


002466 


STARST 


021262 


STEPLU 


011614 


STRIP ■ 


000040 


STRIPS- 


020000 


STRTML- 


000301 


STIJREG 


0O4272 


SUBRPC 


002420 


SVCG8L- 


000000 


SVCINS- 


000001 


SVCSUB- 


000001 


SVCTAG- 


000001 


SVCTST- 


000001 


SUPBOT- 


121000 


SUP DOC- 


121400 


SW1.M 


037106 


SU2.H 


037147 


SYNCH • 


000226 


SILSYM- 


010000 


TA8 


000004 


TBMT - 


000100 


TCCHEK ' 


100000 


TDATA 


002376 


TDSRH - 


120403 


TDSRL - 


120402 


10SRNR 


002651 


TEOM - 


000002 


TERR » 


000200 



000010 
002426 
000004 
002622 
002624 
002626 
002630 
002632 
0026 34 
002636 
002640 
000010 
OOOOOl 
002546 
0024 70 
000002 
002000 
000004 
00 76 76 
010010 
000340 
000040 
03S555 
036310 
026736 
034475 
001000 
100000 
004000 
000400 
035540 
036276 
026724 
034462 
016702 
016il3 
016117 
016133 
016150 
016172 
016213 
016243 
016255 
016437 
016766 
016444 
016454 
016464 
016474 
016511 
016526 
016543 
016557 
016573 
016111 
016607 

017010 



TXTURO 

TXTUR1 

TXTUR2 

TXTUR3 

TXTUR4 

TKTUR5 

TXTUR6 

TXTUR7 

TXTVP 

TXTVRA 

TXTVRB 

TXTVRC 

TXTVRO 

TXTVRE 

TXTVRE 

TXTVRT 

TXTVRO 

TXTVR1 

TXTVR2 

TXTVR3 

TXTVR4 

TXTVR5 

TXTVR6 

TXTVR7 

TXTVR8 

TXTVR9 

TXT1 

TXT10 

TXTU 

TXT11A 

TXT11B 

TXT12 

TXT13 

TXT14 

TXT15 

TXT16 

TXT17 

TXT18 

TXT19 

TXT2 

TXT2A 

TXT28 

TXT20 

TXT3 

TXM 

TXT4A 

TXT5 

TXT6 

TXT7 

TXT7A 

TXT8 

TXT9 

TXU 

TIARGC- 

T$COO€- 

T$ERRN- 

TtEXCP» 



016622 
016630 
016636 
016644 
016652 
016661 
016670 
016674 
016312 
016410 
016413 
016417 
016423 
016427 
016433 
G 16 724 
016330 
016334 
016340 
016345 
016352 
016357 
016364 
016371 
016376 
016405 
014541 
015341 
015361 
015433 
015471 
015541 
015567 
015604 
015642 
015704 
015717 
015754 
016015 
01457 7 
014641 
014700 
016051 
014743 
014773 
015033 
015074 
015076 
015121 
015211 
015301 
015321 
000002 
00OO03 
00 7*M2 
000065 
000000 



• FLAG 

• GMAN 

• HILI 

• LAST 
?LOLI 

• LStM 

• LTNO 

• NEST 

• NSO 

• NS1 

• NS2 

• PTNU 

• SAVL 

• SEGL 

• SUBN 

• TAGL 

• TAGN 

• TEMP 

• TEST 

• TSTr« 

• TSTS 

• ♦AU 
MAUT 

• •CLE 
MDU 
MHAR 

• *HW 
MINI 

• •MSG 

• •PRO 

• •SOT 

• •SUB 

• tsu 

• •TES 
.EOF 

.EHRO 
.ESF 

. E SF T 

1 

1M00E 

10 

10. LP 

10.1 

11 



LP 



11 
12 
13 
14 
15 
16 
17 
18 
19 



2H00t» 



2. 1 



000040 
000000 
000001 
OOOOOl 
000000 

oioooo 

00003? 
177777 
000000 
000005 
0OOOO2 
000000 
177777 
177777 
000000 
177777 
010105 
OOOOOO 
000037 
177777 
OOOOOl 
010016 
010013 
010014 
010015 
010103 
OIOOOO 
010012 
010024 
010011 
010104 
010077 
01OOO1 
010102 
OD0001 
000002 
OOOOOO 
000003 
021604 
000300 
024066 
02 3766 
024120 
024160 
024120 
024234 
024310 
024632 
024 764 
025146 
025654 
026254 
026462 
021 764 
000040 
021 77J 
022050 



G 



T20 

T20. 1 

T20.2 

T20.3 

T21 

T22 

T23 

T24 

T24TBL 

T25 

T25.1 

T25.2 

T25.3 

T25.4 

T25.5 

T25.6 

T26 

T27 

T28 

T28.1 

T28.2 

T28.3 

T29 

T3 

T3.EK) 

T3.EM1 

T3.EM2 

T3.EN0 

T3.ERR 

T3.0K 

T3.SU1 

T3.;",W2 

T3.1 

T3.2 

73,3 

T3.4 

T3.5 

T3.6 

T30 

T30TBL 

T3i 

T4 

T5 

16 

T6.1 

TV 

TM.P 

T7.1 

T8 

T8.LP 

T8,l 

T9 

T9.LP 

T9,l 

UAM 

UMAINT« 

UNIT 



G 
G 

G 
G 



026 740 G 

026 744 

027U4 

0?7264 

027450 

027644 

030040 

030234 

0274 36 

030612 G 

030616 

031204 

031572 

032160 

032546 

033134 

033534 G 

034112 G 

034476 G 

034476 

034636 

034740 

035100 

022764 

022402 

022152 

022344 

022150 

022032 

022044 

022000 

022010 

022426 

022513 

022542 

C22573 

022636 

022700 

035556 

033524 

036312 

023150 

023234 

023460 

023512 

023552 G 

023512 

023604 

023644 G 

023604 

0236 76 

023736 G 

0236 76 

023766 

0O020O (j. 

OOOOOl 

002464 
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SEQ 0209 



UPBITS 


00264.? 




VXAIF.R- 


120016 


VIAI10- 


12000/ 


WSRO 


002256 


XiY 


00000 ? 


UREGS 


00231b 




VIAIFR- 


120015 


V1AT2A- 


120010 


WSP10 


002266 


XtAl WA- 


COOOOO 


USTATR- 


122000 




VIAMS - 


120001 


VIAT2B- 


120011 


WSR12 


002270 


XJf ALS* 


000040 


USYREG 


002552 




VIAORA- 


12001/ 


VREGS 


002336 


WSR14 


0022 /2 


XIO'F'S-- 


000400 


USlRT * 


120400 




VIAORB- 


120000 


WAIT50 


005312 


WSR16 


0022 74 


ytrwut- 


000020 


VECTOR 


037024 




VIAPCR ■ 


120014 


WRIB^T 


002434 


WSR2 


002260 


if 


00006% 


VIA 


120000 




VIASR " 


120012 


WRIl.OC- 


000002 


WSR4 


002262 


U.STIN- 


000001 


VlAACR- 


120013 




VIAT1A" 


120004 


WRIPAG* 


000004 


WSR6 


002264 


U5TTA- 


OOOOOi 


VIADPA- 


120003 




VIAT1B- 


120005 


WRITE 


003/22 


XDATA 


002404 


*T 


000037 


VIADPB* 


120002 




VIAT1C- 


120006 


WR1TFI 


003/34 


XORGB 


020134 






. ABS, 


037462 
000000 


000 
001 


















ERRORS 


DETECTED: 






















VIRTUAL MEMORY USED: 31208 WORDS ( 122 PAGES) 
DYNAMIC MEMORY: 19748 WORDS ( 7f PAGES) 
ELAPSED TIME: 00:06:36 
5fOX1CA.BIC,CfCWA*SeQ/(^/-SP-SVC34»HLB/HL ( CNW1CA.PU 



